OV-GSO-DC / dustem-wrapper_idl

Blame view

src/idl/dustem_write_all_web3p8.pro 954 Bytes
Edit Raw Normal View History
427f1205   Jean-Michel Glorian   version 4.2 merged 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
PRO dustem_write_all_web3p8,st,dir_out

dir_out_dat=dir_out+'/data/'
dir_out_qabs=dir_out+'/oprop/'
dir_out_capa=dir_out+'/hcap/'

;== ISRF
file_out=dir_out_dat+'ISRF.DAT'
dustem_write_isrf_lv,file_out,st.isrf

;== LAMBDA
file_out=dir_out_qabs+'LAMBDA.DAT'
dustem_write_lambda,file_out,st.lambda

;== GRAIN
file_out=dir_out_dat+'GRAIN.DAT'
6730c3f8   Jean-Philippe Bernard   modified to be co... 
17
 
dustem_write_grain_web3p8,file_out,st.grains
427f1205   Jean-Michel Glorian   version 4.2 merged 
18
68d2f391   Jean-Philippe Bernard   modified to cope ... 
19
20
21
22
 
;== GAS
file_out=dir_out_dat+'GAS.DAT'
dustem_write_gas,file_out,st.gas
9ccf7615   Jean-Philippe Bernard   modified to fit u... 
23
 
;stop
68d2f391   Jean-Philippe Bernard   modified to cope ... 
24
25
26
27
28
29
30
 

;== SPIN
dustem_write_spin,dir_out_dat,st.spin

;== CHRG
dustem_write_chrg,dir_out_dat,st.chrg
427f1205   Jean-Michel Glorian   version 4.2 merged 
31
 
;== MIX
68d2f391   Jean-Philippe Bernard   modified to cope ... 
32
 
dustem_write_mix,dir_out_dat,st.mix
427f1205   Jean-Michel Glorian   version 4.2 merged 
33
34
 

;== SIZE
68d2f391   Jean-Philippe Bernard   modified to cope ... 
35
 
dustem_write_size_lv,dir_out_dat,st.size
427f1205   Jean-Michel Glorian   version 4.2 merged 
36
37
 

;== QABS
68d2f391   Jean-Philippe Bernard   modified to cope ... 
38
 
dustem_write_qabs_lv,dir_out_qabs,st.qabs
427f1205   Jean-Michel Glorian   version 4.2 merged 
39
40
 

;== CALOR
68d2f391   Jean-Philippe Bernard   modified to cope ... 
41
 
dustem_write_calor_lv,dir_out_capa,st.calor
427f1205   Jean-Michel Glorian   version 4.2 merged 
42
427f1205   Jean-Michel Glorian   version 4.2 merged 
43
 
;== POL
68d2f391   Jean-Philippe Bernard   modified to cope ... 
44
45
 
dustem_write_pol,dir_out_dat,st.pol
FOR i_axis = 1, 3 DO dustem_write_qabspol,dir_out_qabs,st,i_axis
427f1205   Jean-Michel Glorian   version 4.2 merged 
46
68d2f391   Jean-Philippe Bernard   modified to cope ... 
47
 
;== TLS
427f1205   Jean-Michel Glorian   version 4.2 merged 
48
 
file_out=dir_out_dat
68d2f391   Jean-Philippe Bernard   modified to cope ... 
49
 
dustem_write_tls,dir_out_dat,st.tls
427f1205   Jean-Michel Glorian   version 4.2 merged 
50
51
52
53
 

sortie:

END