diff --git a/src/idl/dustem_write_grain_release.pro b/src/idl/dustem_write_grain_release.pro index 46c22b7..6f0d159 100644 --- a/src/idl/dustem_write_grain_release.pro +++ b/src/idl/dustem_write_grain_release.pro @@ -116,11 +116,11 @@ FOR i=0L,(*!dustem_params).ngrains-1 DO BEGIN st(i).zeta, $ st(i).eta, $ format=frmt - IF !dustem_verbose EQ 1 THEN BEGIN - ;stop - print,st(i).grain_type,st(i).nsize,st(i).type_keywords,st(i).mdust_o_mh,st(i).rho,st(i).amin,st(i).amax, $ - st(i).alpha_o_a0, st(i).at,st(i).ac,st(i).gamma,st(i).au,st(i).zeta,st(i).eta,format=frmt - ENDIF + ;IF !dustem_verbose EQ 1 THEN BEGIN + ; ;stop + ; print,st(i).grain_type,st(i).nsize,st(i).type_keywords,st(i).mdust_o_mh,st(i).rho,st(i).amin,st(i).amax, $ + ; st(i).alpha_o_a0, st(i).at,st(i).ac,st(i).gamma,st(i).au,st(i).zeta,st(i).eta,format=frmt + ;ENDIF ENDFOR close,unit -- libgit2 0.21.2