Commit f9065c74bce3bbbcebc026713943f1417c581920
1 parent
53e653c3
Exists in
master
adapted for new keyword definitions
Showing
1 changed file
with
4 additions
and
4 deletions
Show diff stats
src/idl/dustem_write_fits_table.pro
| @@ -63,11 +63,11 @@ ENDELSE | @@ -63,11 +63,11 @@ ENDELSE | ||
| 63 | 63 | ||
| 64 | IF !run_pol THEN BEGIN | 64 | IF !run_pol THEN BEGIN |
| 65 | ;This is needed to compute Q,U of both SED and spectra | 65 | ;This is needed to compute Q,U of both SED and spectra |
| 66 | - dustem_predicted_polsed=dustem_compute_stokes(*(*!dustem_fit).current_param_values,bidon, $ | ||
| 67 | - dustem_predicted_Qsed,dustem_predicted_Used, $ | ||
| 68 | - dustem_predicted_Q_spec,dustem_predicted_U_spec,dustem_predicted_PSI_spec, $ | 66 | + toto=dustem_compute_stokes(*(*!dustem_fit).current_param_values,bidon, $ |
| 67 | + Q_spec=dustem_predicted_Q_spec,U_spec=dustem_predicted_U_spec,PSI_spec=dustem_predicted_PSI_spec, $ | ||
| 69 | dustem_psi_em,out_st=out_st) | 68 | dustem_psi_em,out_st=out_st) |
| 70 | - | 69 | + dustem_predicted_Qsed=toto[0] |
| 70 | + dustem_predicted_Used=toto[1] | ||
| 71 | ;Same in extinction, but does not work in polarization extinction was not fitted. | 71 | ;Same in extinction, but does not work in polarization extinction was not fitted. |
| 72 | ; dustem_predicted_polext=dustem_compute_stokext(*(*!dustem_fit).current_param_values,bidon, $ | 72 | ; dustem_predicted_polext=dustem_compute_stokext(*(*!dustem_fit).current_param_values,bidon, $ |
| 73 | ; dustem_predicted_Qext,dustem_predicted_Uext, $ | 73 | ; dustem_predicted_Qext,dustem_predicted_Uext, $ |