OV-GSO-DC / dustem-wrapper_idl

Commit f1a4f985eb1fa87637543d5b630112251d38b611

Authored by Jean-Philippe Bernard
1 parent b729ad29
Exists in master

improved

Showing 1 changed file with 8 additions and 7 deletions   Show diff stats
Inline Side-by-side
src/idl/dustem_activate_plugins.pro
  Diff comments   View file @f1a4f98
... ... @@ -76,6 +76,8 @@ ENDIF ELSE BEGIN
76 76 param_func = (*(*!dustem_fit).param_func)
77 77 ENDELSE
78 78  
  79 +;stop
  80 +
79 81 ;Run the plugins, according to their scopes
80 82  
81 83 ;normal (additive) plugins come first as they can be used by other plugins
... ... @@ -86,16 +88,15 @@ ENDELSE
86 88 ;using '**' so not to write the entire scope
87 89  
88 90 ;=== This runs plugins with scopes including STELLAR, REPLACE and ISRF
89   -;dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['*STELLAR*','*REPLACE*','*ISRF*'], avoid=1,use_previous_fortran=use_previous_fortran
90   -dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['ADD','REPLACE'], avoid=1,use_previous_fortran=use_previous_fortran
  91 +;dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['ADD','REPLACE'], avoid=1,use_previous_fortran=use_previous_fortran
  92 +dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['ADD_SED'], avoid=1,use_previous_fortran=use_previous_fortran
91 93  
92 94 ;=== The line below makes fawlty go Segmentation fault. st is undefined at that stage
93 95 ;=== it would run fine if avoid was set to 1
94 96 ;IC: I think the segmentation fault comes from the fact that the user wants to use models that have the /pol keyword in the GRAIN.DAT file without being in polarization mode.
95 97  
96   -dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['STELLAR','ISRF'] ,force_dustem_run=1,st=st,use_previous_fortran=use_previous_fortran ;dustem output is available at this step.
97   -;dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['*STELLAR*','*ISRF*'] ,force_dustem_run=1,st=st,use_previous_fortran=use_previous_fortran ;dustem output is available at this step.
98   -;dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['*STELLAR*','*ISRF*'] ,force_dustem_run=0,st=st,use_previous_fortran=use_previous_fortran ;dustem output is available at this step.
  98 +;dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['STELLAR','ISRF'] ,force_dustem_run=1,st=st,use_previous_fortran=use_previous_fortran ;dustem output is available at this step.
  99 +dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['REPLACE_ISRF'] ,force_dustem_run=1,st=st,use_previous_fortran=use_previous_fortran ;dustem output is available at this step.
99 100  
100 101 ;added this small condition to ensure that dustem is run
101 102 ;(if no ISRF plugin is used)
... ... @@ -105,8 +106,8 @@ dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['STELLAR','IS
105 106 ; endif
106 107 ;THE ABOVE CONDITION IS UNNECESSARY SINCE DUSTEM IS CALLED ABOVE WHETHER PLUGINS ARE RUN OR NOT.
107 108  
108   -;dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['*REPLACE*'],use_previous_fortran=use_previous_fortran
109   -dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['REPLACE'],use_previous_fortran=use_previous_fortran
  109 +;dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['REPLACE'],use_previous_fortran=use_previous_fortran
  110 +dustem_run_plugins, p_dim ,param_descs, param_values, param_func, ['REPLACE_SED'],use_previous_fortran=use_previous_fortran
110 111  
111 112  
112 113 the_end:
... ...