diff --git a/src/memory.F90 b/src/memory.F90 index e5509d1acd7853fa80d3c373f186a35a13b55c4b..87d2de3897f09d0ba78cc35263c5ab9ccb2c3087 100644 --- a/src/memory.F90 +++ b/src/memory.F90 @@ -37,10 +37,8 @@ SUBROUTINE memory ENDIF ! Non linear terms and dnjs table - IF ( .true. ) THEN - CALL allocate_array( Sepj, ips_e,ipe_e, ijs_e,ije_e, ikrs,ikre, ikzs,ikze ) - CALL allocate_array( Sipj, ips_i,ipe_i, ijs_i,ije_i, ikrs,ikre, ikzs,ikze ) - CALL allocate_array( dnjs, 1,maxj+1, 1,maxj+1, 1,maxj+1) - ENDIF + CALL allocate_array( Sepj, ips_e,ipe_e, ijs_e,ije_e, ikrs,ikre, ikzs,ikze ) + CALL allocate_array( Sipj, ips_i,ipe_i, ijs_i,ije_i, ikrs,ikre, ikzs,ikze ) + CALL allocate_array( dnjs, 1,maxj+1, 1,maxj+1, 1,maxj+1) END SUBROUTINE memory