Commit 4675ca75eee3e0c0ec02bfc8f54012a8996f05d4
Exists in
master
Merge branch 'master' of https://gitlab.irap.omp.eu/OV-GSO-DC/dustem-wrapper_idl
Showing
1 changed file
with
3 additions
and
1 deletions
Show diff stats
src/idl/dustem_init_params.pro
... | ... | @@ -241,7 +241,7 @@ if pd_set eq 1 then begin |
241 | 241 | new_ulims=intarr(nnew) |
242 | 242 | new_llims=intarr(nnew) |
243 | 243 | new_fixed=intarr(nnew) |
244 | - new_tied=intarr(nnew) | |
244 | + new_tied=strarr(nnew) | |
245 | 245 | if keyword_set(ulimed) then new_ulimed=ulimed |
246 | 246 | if keyword_set(llimed) then new_llimed=llimed |
247 | 247 | if keyword_set(ulims) then new_ulims=ulims |
... | ... | @@ -384,10 +384,12 @@ initialise: |
384 | 384 | npd=n_elements(pd) & nfpd=n_elements(fpd) |
385 | 385 | |
386 | 386 | if npd ge 1 then dustem_init_parinfo,pd,iv,up_limited=ulimed,lo_limited=llimed,up_limits=ulims,lo_limits=llims,fixed=fixed,tied=tied |
387 | + | |
387 | 388 | if npd eq 0 and nold gt 0 then $ |
388 | 389 | dustem_init_parinfo,pd,iv,/clear |
389 | 390 | |
390 | 391 | if nfpd ge 1 then dustem_init_fixed_params,fpd,fiv |
392 | + | |
391 | 393 | if nfpd eq 0 and nold_fixed gt 0 then $ |
392 | 394 | dustem_init_fixed_params,fpd,fiv,/clear |
393 | 395 | ... | ... |