Commit 25a9c7a2fa7c9a9dc5b2d96a94cc3f88cbcd8033
1 parent
06fe3845
Exists in
master
removing stops
Showing
5 changed files
with
6 additions
and
18 deletions
Show diff stats
src/idl/dustem_filter2instru.pro
| ... | ... | @@ -40,7 +40,7 @@ IF keyword_set(help) THEN BEGIN |
| 40 | 40 | ENDIF |
| 41 | 41 | |
| 42 | 42 | Nfilt=n_elements(filter) |
| 43 | -stop | |
| 43 | + | |
| 44 | 44 | |
| 45 | 45 | ind1=lonarr(Nfilt) |
| 46 | 46 | FOR i=0L,Nfilt-1 DO BEGIN |
| ... | ... | @@ -52,7 +52,7 @@ FOR i=0L,Nfilt-1 DO BEGIN |
| 52 | 52 | ENDFOR |
| 53 | 53 | |
| 54 | 54 | instru=!dustem_instrument_description(ind1).instru |
| 55 | -stop | |
| 55 | + | |
| 56 | 56 | the_end: |
| 57 | 57 | RETURN,instru |
| 58 | 58 | ... | ... |
src/idl/dustem_init.pro
| ... | ... | @@ -303,13 +303,11 @@ ENDELSE |
| 303 | 303 | ;dir_in=!dustem_soft_dir+'/src/'+dir |
| 304 | 304 | |
| 305 | 305 | |
| 306 | -if keyword_set(kwords) then defsysv, '!dustem_kwords', ptr_new(kwords) ;array with charactr strings of population keywords | |
| 307 | - | |
| 306 | +if keyword_set(kwords) then defsysv, '!dustem_kwords', ptr_new(kwords) | |
| 308 | 307 | |
| 309 | 308 | st_model=dustem_read_all(dir_in,/silent) |
| 310 | 309 | !dustem_params=ptr_new(st_model) |
| 311 | -stop | |
| 312 | -;ADD A last wavelength here. | |
| 310 | + | |
| 313 | 311 | |
| 314 | 312 | ;=== create dynamical storage if needed |
| 315 | 313 | IF not file_test(!dustem_dat,/dir) THEN BEGIN | ... | ... |
src/idl/dustem_read_all_web3p8.pro
| ... | ... | @@ -50,7 +50,6 @@ file=dir_in_dat+(*!dustem_inputs).grain |
| 50 | 50 | ;st_grains=dustem_read_grain(file,silent=silent) |
| 51 | 51 | st_grains=dustem_read_grain(file,silent=silent,key_str=key_str,G0=G0) |
| 52 | 52 | Ngrains=n_elements(st_grains) |
| 53 | -stop | |
| 54 | 53 | |
| 55 | 54 | file=dir_in_dat+'ISRF.DAT' |
| 56 | 55 | st_isrf=dustem_read_isrf(file,silent=silent,Nisrf=Nisrf) |
| ... | ... | @@ -83,13 +82,6 @@ ENDFOR |
| 83 | 82 | file=dir_in_qabs+'LAMBDA.DAT' |
| 84 | 83 | st_lambda=dustem_read_lambda(file,silent=silent) |
| 85 | 84 | |
| 86 | - stop | |
| 87 | -; if keyword_set(kwords) then begin | |
| 88 | -; FOR i=0L,n_elements(kwords)-1 DO BEGIN | |
| 89 | -; st_grains(i).type_keywords=kwords(i) | |
| 90 | -; ENDFOR | |
| 91 | -; endif | |
| 92 | - | |
| 93 | 85 | ;=== Read size distribution files |
| 94 | 86 | st_size=ptrarr(Ngrains) |
| 95 | 87 | FOR i=0L,Ngrains-1 DO BEGIN | ... | ... |
src/idl/dustem_run.pro