Commit 7d6bf3f2f4bfe6402fbd8b1ddacb9f4e7eb8b3ce
1 parent
dbfbb985
Exists in
master
improved
Showing
2 changed files
with
3 additions
and
0 deletions
Show diff stats
LabTools/IRAP/JPB/make_sed_phangs_tables.pro
... | ... | @@ -548,6 +548,7 @@ CASE use_grid_type OF |
548 | 548 | goto,the_end |
549 | 549 | END |
550 | 550 | '0-200': BEGIN ;This is to extend the range of YG1 by 2 values lower values |
551 | + fortran_user=dustem_set_up_fortran(/random_name) ;use a random fortran number | |
551 | 552 | IF keyword_set(isrf_class) THEN BEGIN ;do just one table |
552 | 553 | use_isrf_class=isrf_class |
553 | 554 | ENDIF ELSE BEGIN |
... | ... | @@ -570,6 +571,7 @@ CASE use_grid_type OF |
570 | 571 | goto,the_end |
571 | 572 | END |
572 | 573 | '+2000': BEGIN ;This is to extend the range of F0 parameter by 2 values above max. |
574 | + fortran_user=dustem_set_up_fortran(/random_name) ;use a random fortran number | |
573 | 575 | IF keyword_set(isrf_class) THEN BEGIN ;do just one table |
574 | 576 | use_isrf_class=isrf_class |
575 | 577 | ENDIF ELSE BEGIN | ... | ... |
src/idl/dustem_grids_extend_parameter_range.pro
... | ... | @@ -129,6 +129,7 @@ PRO dustem_grids_extend_parameter_range,input_table_name,pd_add,Nv_add $ |
129 | 129 | ;IF param_is_non_linear THEN BEGIN ;This is if the parameter to be added is non-linear |
130 | 130 | ;== make table for non-linear parameters |
131 | 131 | message,'========================== Making added grid for non-linear parameters ...',/continue |
132 | + ;In priciple, if non-linear parameters are already in the input table, there should be no reason to do that, but anyway ... | |
132 | 133 | dustem_make_sed_table,add_model $ |
133 | 134 | ,add_parameters_description[ind_non_linear] $ |
134 | 135 | ,add_iv_min[ind_non_linear] $ | ... | ... |