dustem_write_all_lv.pro
561 Bytes
PRO dustem_write_all_lv,st,dir_out
;stop
;== ISRF
file_out=dir_out+'les_DAT/'+'ISRF.DAT'
dustem_write_isrf_lv,file_out,st.isrf
;== LAMBDA
file_out=dir_out+'les_QABS/'+'LAMBDA.DAT'
dustem_write_lambda,file_out,st.lambda
;== GRAIN
file_out=dir_out+'les_DAT/'+'GRAIN.DAT'
dustem_write_grain_lv,file_out,st.grains
;== SIZE
file_out=dir_out+'les_DAT/'
dustem_write_size_lv,file_out,st.size
;== QABS
file_out=dir_out+'les_QABS/'
dustem_write_qabs_lv,file_out,st.qabs
;== CALOR
file_out=dir_out+'les_CAPA/'
dustem_write_calor_lv,file_out,st.calor
sortie:
END