From b30464dbd6c9917119fa1466dab0661e15d78d55 Mon Sep 17 00:00:00 2001 From: Annie Hughes Date: Thu, 6 Oct 2022 12:01:50 +0200 Subject: [PATCH] tidied inline help and comments --- src/idl/dustem_read_all.pro | 14 ++++---------- 1 file changed, 4 insertions(+), 10 deletions(-) diff --git a/src/idl/dustem_read_all.pro b/src/idl/dustem_read_all.pro index e111247..413e0e1 100755 --- a/src/idl/dustem_read_all.pro +++ b/src/idl/dustem_read_all.pro @@ -10,7 +10,8 @@ FUNCTION dustem_read_all,dir_in,silent=silent,help=help ; CALLING SEQUENCE: ; st=dustem_read_all(dir_in,silent=silent,help=help) ; INPUTS: -; dir_in: input directory +; dir_in: directory containing .DAT files to describe grain +; population properties ; OPTIONAL INPUT PARAMETERS: ; None ; OUTPUTS: @@ -51,13 +52,13 @@ IF !dustem_which EQ 'WEB3p8' or !dustem_which EQ 'RELEASE' THEN BEGIN goto, the_end ENDIF -;== IAS VERSION -- TO BE DEPRECATED IN FUTURE DISTRIB +;== IAS VERSION -- TO BE DEPRECATED IN FUTURE DISTRIBS IF !dustem_which EQ 'VERSTRAETE' THEN BEGIN st=dustem_read_all_lv(dir_in,silent=silent) goto,ionfrac ENDIF -;== IRAP/IPAG VERSIONS -- TO BE DEPRECATED IN FUTURE DISTRIB +;== IRAP/IPAG VERSIONS -- TO BE DEPRECATED IN FUTURE DISTRIBS ;== note: the output keywords are set only for LV version file=dir_in+'GRAIN.DAT' st_grains=dustem_read_grain(file,silent=silent) @@ -131,12 +132,6 @@ IF !dustem_which EQ 'COMPIEGNE' THEN BEGIN st={Ngrains:Ngrains,grains:sst_grains, $ isrf:st_isrf,qabs:st_qabs,calor:st_calor,specem:st_specem,lambda:st_lambda} ENDIF -; according to logic, should will never reach these lines -;IF !dustem_which EQ 'VERSTRAETE' THEN BEGIN -; -;st={Ngrains:Ngrains,grains:sst_grains, $ -; isrf:st_isrf,qabs:st_qabs,calor:st_calor,specem:st_specem,lambda:st_lambda} -;ENDIF ionfrac: IF !dustem_which EQ 'VERSTRAETE' THEN BEGIN @@ -238,7 +233,6 @@ IF !dustem_which EQ 'VERSTRAETE' THEN BEGIN ;JPB: The above is stupid, especially before I added the !dustem_verbose test ENDIF - the_end: RETURN,st -- libgit2 0.21.2