! comments
*** MODEL NSET NGAS NLEV NQPR
JGAS(1), NISO(1)
JGAS(2), NISO(2)
...
JGAS(NGAS) NISO(NGAS)
P(1) P(2) ...
... P(NLEV)
0 [=ISET for TK]
TK(1) TK(2) ...
... TK(NLEV)
! Vibrational Partition functions
[repeat for IQPR = 1, NQPR ]
JGAS(IGAS) JISO(IISO)
QV(1,IISO,IGAS) QV(2,IISO,IGAS) ...
... QV(NLEV,IISO,IGAS)
[end repeat for IQPR]
! Vibrational Temperatures
[repeat for ISET = 1, NSET]
ISET JGAS(IGAS) JISO(IISO) IVSGQ(ISET) ENERGY(ISET)
TV(1,ISET), TV(2,ISET) ...
... TV(NLEV,ISET)
[end repeat for ISET]
[eof]
! Non-LTE CO2 Vibrational temperatures for US Std.Atmos
*** 6 3 1 5 1
2 1
5.529E+01, 2.871E+00, 2.190E-01, 1.050E-02, 3.200E-04
0
216.70, 250.40, 247.00, 198.60, 195.10
!QV Vibrational Partition functions
2 1
1.000331 1.000228 1.000165 1.000171 1.000196
!TV Vibrational Temperatures
1 2 1 2 667.3801
210.000 201.750 195.000 195.750 198.500
2 2 1 3 1285.4087
210.000 201.750 194.929 195.731 198.488
3 2 1 4 1335.1317
221.986 225.341 227.785 229.493 231.004
[eof]