diff --git a/src/idl/dustem_write_isrf_lv.pro b/src/idl/dustem_write_isrf_lv.pro index 2bb201a..e79356a 100755 --- a/src/idl/dustem_write_isrf_lv.pro +++ b/src/idl/dustem_write_isrf_lv.pro @@ -85,7 +85,6 @@ IF ctpop NE 0 or ctusrisrf NE 0 THEN BEGIN ind_G0 = where(strupcase(strmid((*(*!dustem_fit).fixed_param_descs),5,/reverse)) EQ 'MS).G0', countg0) IF countg0 NE 0 THEN G0_mathis = (*(*!dustem_fit).fixed_param_init_values)[ind_G0] ENDIF - STOP ;Locating gas.G0 in the free parameters vector ind_GASG0 = where(strupcase(strmid((*(*!dustem_fit).param_descs),5,/reverse)) EQ 'GAS.G0', countgasg0) IF countgasg0 THEN BEGIN -- libgit2 0.21.2