/wrfv2_fire/phys/module_sf_ssib.F
FORTRAN Legacy | 6529 lines | 4263 code | 79 blank | 2187 comment | 60 complexity | 0731473777a90263eb0524243f12f129 MD5 | raw file
Possible License(s): AGPL-1.0
Large files files are truncated, but you can click here to view the full file
- MODULE module_sf_ssib
- !This version of SSiB land-surface model includes a multi-layer snow scheme
- !For better results, please use the SSiB vegetation map (geog_data_res in WPS)
- !References for the SSiB:
- !Xue et al. 1991, J. Climate, 4, 345-364.
- !Sun and Xue, 2001, Adv. in Atmos. Sci, 18, 335-354.
- !Xue et al., 2003, J. Geophy. Res. 108, D22, doi: 10.1029/2002JD003174.
- !Coding by Fernando De Sales and Zhengxin Liu (2011)
-
- REAL, PARAMETER :: CPAIR = 1004.6 &
- ,STEFAN = 5.669 * 10E-9 &
- ,GRAV = 9.81 &
- ,VKC = 0.4 &
- ,PIE = 3.14159265 &
- ,TIMCON = PIE/86400. &
- ,CLAI = 4.2 * 1000. * 0.2 &
- ,CW = 4.2 * 1000. * 1000. &
- ,TF = 273.16 &
- ,GASR = 287.05 &
- ,HLAT = 2.52E6 &
- ,SNOMEL = 370518.5 * 1000.
- INTEGER, PARAMETER :: ITRUNK = 3
- !crr snow
- REAL, PARAMETER :: SSISNOW = 0.04 &
- ,FLMIN = 0.03 &
- ,FLMAX = 0.10 &
- ,DZMIN = 0.002 &
- ,WOMIN = 0.0004 &
- ,CL = 4212.7 &
- ,DLM = 3.335d5 &
- ,RHOWATER = 1000.0 &
- ,DICE = 920.0 &
- ,DKSATSNOW= 0.01 &
- ,SNODEP_CR= 0.07
- INTEGER, PARAMETER :: N = 3 &
- ,N1 = 4 &
- ,N2 = 4
- !crr snow
- !ssib vegetation parameters
- REAL, DIMENSION (13,2,3,2) :: tran0,ref0
- REAL, DIMENSION (13,12,2) :: green0,vcover0,zlt0
- REAL, DIMENSION (13,2,3) :: rstpar0
- REAL, DIMENSION (13,12) :: z000,d0,z20,z10,rdc0,rbc0
- REAL, DIMENSION (13,3) :: depth0,soref0
- REAL, DIMENSION (13,2) :: chil0,topt0,tl0,tu0,defac0,ph10,ph20,rootd0
- REAL, DIMENSION (13) :: bee0,phsat0,poros0,satco0,slope0
- !
- data tran0/ &
- 0.5000000E-01, 0.5000000E-01, 0.5000000E-01, 0.5000000E-01, &
- 0.5000000E-01, 0.5000000E-01, 0.7000000E-01, 0.5000000E-01, &
- 0.5000000E-01, 0.5000000E-01, 0.1000000E-02, 0.5000000E-01, &
- 0.1000000E-02, &
- 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, &
- 0.1000000E-02, 0.7000000E-01, 0.1000000E-02, 0.7000000E-01, &
- 0.1000000E-02, 0.7000000E-01, 0.1000000E-02, 0.7000000E-01, &
- 0.1000000E-02, &
- 0.2500000E+00, 0.2500000E+00, 0.1500000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.2500000E+00, 0.2475000E+00, 0.2500000E+00, &
- 0.2500000E+00, 0.2500000E+00, 0.1000000E-02, 0.2500000E+00, &
- 0.1000000E-02, &
- 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, &
- 0.1000000E-02, 0.2475000E+00, 0.1000000E-02, 0.2475000E+00, &
- 0.1000000E-02, 0.2475000E+00, 0.1000000E-02, 0.2475000E+00, &
- 0.1000000E-02, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, &
- 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, &
- 0.1000000E-02, 0.1000000E-02, 0.2200000E+00, 0.1000000E-02, &
- 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, &
- 0.1000000E-02, &
- 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, &
- 0.1000000E-02, 0.2200000E+00, 0.1000000E-02, 0.2200000E+00, &
- 0.1000000E-02, 0.2200000E+00, 0.1000000E-02, 0.2200000E+00, &
- 0.1000000E-02, &
- 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, &
- 0.1000000E-02, 0.1000000E-02, 0.3750000E+00, 0.1000000E-02, &
- 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, &
- 0.1000000E-02, &
- 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, &
- 0.1000000E-02, 0.3750000E+00, 0.1000000E-02, 0.3750000E+00, &
- 0.1000000E-02, 0.3750000E+00, 0.1000000E-02, 0.3750000E+00, &
- 0.1000000E-02, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00/
- data ref0/ &
- 0.1000000E+00, 0.1000000E+00, 0.7000000E-01, 0.7000000E-01, &
- 0.7000000E-01, 0.1000000E+00, 0.1050000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.1000000E+00, 0.1000000E-02, 0.1000000E+00, &
- 0.1000000E-02, &
- 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, &
- 0.1000000E-02, 0.1050000E+00, 0.1000000E-02, 0.1050000E+00, &
- 0.1000000E-02, 0.1050000E+00, 0.1000000E-02, 0.1050000E+00, &
- 0.1000000E-02, &
- 0.4500000E+00, 0.4500000E+00, 0.4000000E+00, 0.3500000E+00, &
- 0.3500000E+00, 0.4500000E+00, 0.5775000E+00, 0.4500000E+00, &
- 0.4500000E+00, 0.4500000E+00, 0.1000000E-02, 0.4500000E+00, &
- 0.1000000E-02, &
- 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, &
- 0.1000000E-02, 0.5775000E+00, 0.1000000E-02, 0.5775000E+00, &
- 0.1000000E-02, 0.5775000E+00, 0.1000000E-02, 0.5775000E+00, &
- 0.1000000E-02, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, &
- 0.1600000E+00, 0.1600000E+00, 0.1600000E+00, 0.1600000E+00, &
- 0.1600000E+00, 0.1600000E+00, 0.3600000E+00, 0.1600000E+00, &
- 0.1600000E+00, 0.1600000E+00, 0.1000000E-02, 0.1600000E+00, &
- 0.1000000E-02, &
- 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, &
- 0.1000000E-02, 0.3600000E+00, 0.1000000E-02, 0.3600000E+00, &
- 0.1000000E-02, 0.3600000E+00, 0.1000000E-02, 0.3600000E+00, &
- 0.1000000E-02, &
- 0.3900000E+00, 0.3900000E+00, 0.3900000E+00, 0.3900000E+00, &
- 0.3900000E+00, 0.3900000E+00, 0.5775000E+00, 0.3900000E+00, &
- 0.3900000E+00, 0.3900000E+00, 0.1000000E-02, 0.3900000E+00, &
- 0.1000000E-02, &
- 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, 0.1000000E-02, &
- 0.1000000E-02, 0.5775000E+00, 0.1000000E-02, 0.5775000E+00, &
- 0.1000000E-02, 0.5775000E+00, 0.1000000E-02, 0.5775000E+00, &
- 0.1000000E-02, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00/
- data green0/ &
- 0.9050000E+00, 0.2564000E-01, 0.8680600E+00, 0.9132400E+00, &
- 0.2475200E+00, 0.6319100E+00, 0.5681800E+00, 0.7978700E+00, &
- 0.8364300E+00, 0.4512600E+00, 0.1000000E-03, 0.2083300E+00, &
- 0.1000000E-03, &
- 0.9050000E+00, 0.2564000E-01, 0.8717700E+00, 0.9170300E+00, &
- 0.2475200E+00, 0.6566600E+00, 0.6218900E+00, 0.5319100E+00, &
- 0.7172100E+00, 0.4512600E+00, 0.1000000E-03, 0.2083300E+00, &
- 0.1000000E-03, &
- 0.9050000E+00, 0.4153800E+00, 0.8847300E+00, 0.9226600E+00, &
- 0.2475200E+00, 0.5176000E+00, 0.6637200E+00, 0.3623200E+00, &
- 0.2577300E+00, 0.4512600E+00, 0.1000000E-03, 0.4411800E+00, &
- 0.1000000E-03, &
- 0.9050000E+00, 0.7594900E+00, 0.9061000E+00, 0.9247000E+00, &
- 0.6637200E+00, 0.6527400E+00, 0.6972100E+00, 0.5681800E+00, &
- 0.7246400E+00, 0.4512600E+00, 0.1000000E-03, 0.7594900E+00, &
- 0.1000000E-03, &
- 0.9050000E+00, 0.8875700E+00, 0.9164200E+00, 0.9266400E+00, &
- 0.8104700E+00, 0.6527400E+00, 0.8104700E+00, 0.5681800E+00, &
- 0.1736100E+00, 0.4512600E+00, 0.1000000E-03, 0.8875700E+00, &
- 0.1000000E-03, &
- 0.9050000E+00, 0.9252000E+00, 0.9259300E+00, 0.9045800E+00, &
- 0.8680600E+00, 0.7246400E+00, 0.9079900E+00, 0.5681800E+00, &
- 0.5681800E+00, 0.6218900E+00, 0.1000000E-03, 0.9252000E+00, &
- 0.1000000E-03, &
- 0.9050000E+00, 0.8364300E+00, 0.9293700E+00, 0.9021600E+00, &
- 0.6040900E+00, 0.8712500E+00, 0.8132000E+00, 0.5681800E+00, &
- 0.5681800E+00, 0.9200800E+00, 0.1000000E-03, 0.8364300E+00, &
- 0.1000000E-03, &
- 0.9050000E+00, 0.6967200E+00, 0.8209400E+00, 0.9126500E+00, &
- 0.5854000E+00, 0.7966000E+00, 0.3943200E+00, 0.8680600E+00, &
- 0.7246400E+00, 0.6970300E+00, 0.1000000E-03, 0.6967200E+00, &
- 0.1000000E-03, &
- 0.9050000E+00, 0.3306900E+00, 0.7123000E+00, 0.8982800E+00, &
- 0.4990000E+00, 0.7654600E+00, 0.4434600E+00, 0.6505600E+00, &
- 0.8403400E+00, 0.7567000E-01, 0.1000000E-03, 0.3439200E+00, &
- 0.1000000E-03, &
- 0.9050000E+00, 0.1656400E+00, 0.6145700E+00, 0.8548200E+00, &
- 0.3834400E+00, 0.6146100E+00, 0.5434800E+00, 0.5154600E+00, &
- 0.8680600E+00, 0.4512600E+00, 0.1000000E-03, 0.1785700E+00, &
- 0.1000000E-03, &
- 0.9050000E+00, 0.1538000E-01, 0.8599500E+00, 0.8733600E+00, &
- 0.2487600E+00, 0.5086500E+00, 0.5531000E+00, 0.6302500E+00, &
- 0.8875700E+00, 0.4512600E+00, 0.1000000E-03, 0.1470600E+00, &
- 0.1000000E-03, &
- 0.9050000E+00, 0.2564000E-01, 0.8599500E+00, 0.9132400E+00, &
- 0.1984100E+00, 0.7898900E+00, 0.4975100E+00, 0.7978700E+00, &
- 0.9132400E+00, 0.4512600E+00, 0.1000000E-03, 0.2083300E+00, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03/
- data vcover0/ &
- 0.9800000E+00, 0.7500000E+00, 0.7500000E+00, 0.7500000E+00, &
- 0.5000000E+00, 0.3000000E+00, 0.9000000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.3000000E+00, 0.1000000E-04, 0.7500000E-01, &
- 0.1000000E-04, &
- 0.9800000E+00, 0.7500000E+00, 0.7500000E+00, 0.7500000E+00, &
- 0.5000000E+00, 0.3000000E+00, 0.9000000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.3000000E+00, 0.1000000E-04, 0.7500000E-01, &
- 0.1000000E-04, &
- 0.9800000E+00, 0.7500000E+00, 0.7500000E+00, 0.7500000E+00, &
- 0.5000000E+00, 0.3000000E+00, 0.9000000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.3000000E+00, 0.1000000E-04, 0.7500000E-01, &
- 0.1000000E-04, &
- 0.9800000E+00, 0.7500000E+00, 0.7500000E+00, 0.7500000E+00, &
- 0.5000000E+00, 0.3000000E+00, 0.9000000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.3000000E+00, 0.1000000E-04, 0.7500000E-01, &
- 0.1000000E-04, &
- 0.9800000E+00, 0.7500000E+00, 0.7500000E+00, 0.7500000E+00, &
- 0.5000000E+00, 0.3000000E+00, 0.9000000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.3000000E+00, 0.1000000E-04, 0.7500000E-01, &
- 0.1000000E-04, &
- 0.9800000E+00, 0.7500000E+00, 0.7500000E+00, 0.7500000E+00, &
- 0.5000000E+00, 0.3000000E+00, 0.9000000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.3000000E+00, 0.1000000E-04, 0.7500000E-01, &
- 0.1000000E-04, &
- 0.9800000E+00, 0.7500000E+00, 0.7500000E+00, 0.7500000E+00, &
- 0.5000000E+00, 0.3000000E+00, 0.9000000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.3000000E+00, 0.1000000E-04, 0.7500000E-01, &
- 0.1000000E-04, &
- 0.9800000E+00, 0.7500000E+00, 0.7500000E+00, 0.7500000E+00, &
- 0.5000000E+00, 0.3000000E+00, 0.9000000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.3000000E+00, 0.1000000E-04, 0.7500000E-01, &
- 0.1000000E-04, &
- 0.9800000E+00, 0.7500000E+00, 0.7500000E+00, 0.7500000E+00, &
- 0.5000000E+00, 0.3000000E+00, 0.9000000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.3000000E+00, 0.1000000E-04, 0.7500000E-01, &
- 0.1000000E-04, &
- 0.9800000E+00, 0.7500000E+00, 0.7500000E+00, 0.7500000E+00, &
- 0.5000000E+00, 0.3000000E+00, 0.9000000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.3000000E+00, 0.1000000E-04, 0.7500000E-01, &
- 0.1000000E-04, &
- 0.9800000E+00, 0.7500000E+00, 0.7500000E+00, 0.7500000E+00, &
- 0.5000000E+00, 0.3000000E+00, 0.9000000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.3000000E+00, 0.1000000E-04, 0.7500000E-01, &
- 0.1000000E-04, &
- 0.9800000E+00, 0.7500000E+00, 0.7500000E+00, 0.7500000E+00, &
- 0.5000000E+00, 0.3000000E+00, 0.9000000E+00, 0.1000000E+00, &
- 0.1000000E+00, 0.3000000E+00, 0.1000000E-04, 0.7500000E-01, &
- 0.1000000E-04, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-04, 0.1000000E-03, &
- 0.1000000E-04, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-04, 0.1000000E-03, &
- 0.1000000E-04, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-04, 0.1000000E-03, &
- 0.1000000E-04, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-04, 0.1000000E-03, &
- 0.1000000E-04, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-04, 0.1000000E-03, &
- 0.1000000E-04, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-04, 0.1000000E-03, &
- 0.1000000E-04, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-04, 0.1000000E-03, &
- 0.1000000E-04, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-04, 0.1000000E-03, &
- 0.1000000E-04, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-04, 0.1000000E-03, &
- 0.1000000E-04, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-04, 0.1000000E-03, &
- 0.1000000E-04, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-04, 0.1000000E-03, &
- 0.1000000E-04, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-04, 0.1000000E-03, &
- 0.1000000E-04/
- data chil0/ &
- 0.1000000E+00, 0.2500000E+00, 0.1300000E+00, 0.1000000E-01, &
- 0.1000000E-01, 0.1000000E-01, -0.3000000E+00, 0.1000000E-01, &
- 0.1000000E-01, 0.2000000E+00, 0.1000000E-01, -0.2000000E-01, &
- 0.1000000E-01, &
- 0.1000000E+00, 0.2500000E+00, 0.1300000E+00, 0.1000000E-01, &
- 0.1000000E-01, -0.3000000E+00, -0.3000000E+00, -0.3000000E+00, &
- 0.1000000E-01, 0.2000000E+00, 0.1000000E-01, -0.2000000E-01, &
- 0.1000000E-01/
- data rstpar0/ &
- 0.2335900E+04, 0.9802230E+04, 0.6335955E+04, 0.2869680E+04, &
- 0.2869680E+04, 0.5665121E+05, 0.2582010E+04, 0.9398942E+05, &
- 0.9398942E+05, 0.9802230E+04, 0.1000000E+04, 0.7459000E+04, &
- 0.1000000E+04, &
- 0.2335900E+04, 0.9802230E+04, 0.6335955E+04, 0.2869680E+04, &
- 0.2869680E+04, 0.2582010E+04, 0.2582010E+04, 0.2582010E+04, &
- 0.1000000E+01, 0.2582010E+04, 0.1000000E+04, 0.7459000E+04, &
- 0.1000000E+04, &
- 0.1450000E-01, 0.1055000E+02, 0.7120000E+01, 0.3690000E+01, &
- 0.3690000E+01, 0.1083000E+02, 0.1090000E+01, 0.1000000E-01, &
- 0.1000000E-01, 0.1055000E+02, 0.1000000E+04, 0.5700000E+01, &
- 0.1000000E+04, &
- 0.1450000E-01, 0.1055000E+02, 0.7120000E+01, 0.3690000E+01, &
- 0.3690000E+01, 0.1090000E+01, 0.1090000E+01, 0.1090000E+01, &
- 0.1000000E+01, 0.1090000E+01, 0.1000000E+04, 0.5700000E+01, &
- 0.1000000E+04, &
- 0.1534900E+03, 0.1800000E+03, 0.2065000E+03, 0.2330000E+03, &
- 0.2330000E+03, 0.1650000E+03, 0.1100000E+03, 0.8550000E+03, &
- 0.8550000E+03, 0.1800000E+03, 0.1000000E+04, 0.2520000E+02, &
- 0.1000000E+04, &
- 0.1534900E+03, 0.1800000E+03, 0.2065000E+03, 0.2330000E+03, &
- 0.2330000E+03, 0.1100000E+03, 0.1100000E+03, 0.1100000E+03, &
- 0.1000000E+01, 0.1100000E+03, 0.1000000E+04, 0.2520000E+02, &
- 0.1000000E+04/
- data topt0/ &
- 0.3030000E+03, 0.3000000E+03, 0.2940000E+03, 0.2880000E+03, &
- 0.2880000E+03, 0.2970000E+03, 0.3130000E+03, 0.3150000E+03, &
- 0.3150000E+03, 0.3000000E+03, 0.3100000E+03, 0.3000000E+03, &
- 0.3100000E+03, &
- 0.3030000E+03, 0.3000000E+03, 0.2940000E+03, 0.2880000E+03, &
- 0.2880000E+03, 0.3120000E+03, 0.3130000E+03, 0.3130000E+03, &
- 0.3150000E+03, 0.2890000E+03, 0.3100000E+03, 0.3000000E+03, &
- 0.3100000E+03/
- data tl0/ &
- 0.2730000E+03, 0.2730000E+03, 0.2700000E+03, 0.2680000E+03, &
- 0.2680000E+03, 0.2730000E+03, 0.2830000E+03, 0.2830000E+03, &
- 0.2830000E+03, 0.2730000E+03, 0.3000000E+03, 0.2730000E+03, &
- 0.3000000E+03, &
- 0.2730000E+03, 0.2730000E+03, 0.2700000E+03, 0.2680000E+03, &
- 0.2680000E+03, 0.2730000E+03, 0.2830000E+03, 0.2830000E+03, &
- 0.2830000E+03, 0.2730000E+03, 0.3000000E+03, 0.2730000E+03, &
- 0.3000000E+03/
- data tu0/ &
- 0.3180000E+03, 0.3180000E+03, 0.3150000E+03, 0.3130000E+03, &
- 0.3130000E+03, 0.3230000E+03, 0.3280000E+03, 0.3230000E+03, &
- 0.3230000E+03, 0.3230000E+03, 0.3200000E+03, 0.3180000E+03, &
- 0.3200000E+03, &
- 0.3180000E+03, 0.3180000E+03, 0.3150000E+03, 0.3130000E+03, &
- 0.3130000E+03, 0.3230000E+03, 0.3280000E+03, 0.3280000E+03, &
- 0.3230000E+03, 0.3090000E+03, 0.3200000E+03, 0.3150000E+03, &
- 0.3200000E+03/
- data defac0/ &
- 0.2730000E-01, 0.3570000E-01, 0.3400000E-01, 0.3100000E-01, &
- 0.3100000E-01, 0.3570000E-01, 0.2380000E-01, 0.2750000E-01, &
- 0.2750000E-01, 0.2750000E-01, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00, &
- 0.2730000E-01, 0.3570000E-01, 0.3400000E-01, 0.3100000E-01, &
- 0.3100000E-01, 0.2380000E-01, 0.2380000E-01, 0.2380000E-01, &
- 0.2380000E-01, 0.2380000E-01, 0.0000000E+00, 0.0000000E+00, &
- 0.0000000E+00/
- data ph10/ &
- 0.1200000E+01, 0.5350000E+01, 0.1920000E+01, 0.3700000E+01, &
- 0.7800000E+01, 0.1800000E+01, 0.1730000E+01, 0.1920000E+01, &
- 0.1390000E+01, 0.9600000E+00, 0.3000000E+01, 0.1800000E+01, &
- 0.5000000E+01, &
- 0.1200000E+01, 0.5350000E+01, 0.1920000E+01, 0.3700000E+01, &
- 0.7800000E+01, 0.1800000E+01, 0.1730000E+01, 0.1920000E+01, &
- 0.1390000E+01, 0.9600000E+00, 0.3000000E+01, 0.1800000E+01, &
- 0.5000000E+01/
- data ph20/ &
- 0.6250000E+01, 0.5570000E+01, 0.5730000E+01, 0.5530000E+01, &
- 0.5660000E+01, 0.5670000E+01, 0.5800000E+01, 0.5610000E+01, &
- 0.6370000E+01, 0.5370000E+01, 0.6000000E+01, 0.5670000E+01, &
- 0.6000000E+01, &
- 0.6250000E+01, 0.5570000E+01, 0.5730000E+01, 0.5530000E+01, &
- 0.5660000E+01, 0.5670000E+01, 0.5800000E+01, 0.5610000E+01, &
- 0.6370000E+01, 0.5370000E+01, 0.6000000E+01, 0.5670000E+01, &
- 0.6000000E+01/
- data zlt0/ &
- 0.5014160E+01, 0.3900000E+00, 0.3456000E+01, 0.6570000E+01, &
- 0.4040000E+00, 0.1766000E+01, 0.7040000E+00, 0.5780000E+00, &
- 0.1076000E+01, 0.3776000E+00, 0.1000000E-03, 0.4800000E-01, &
- 0.1000000E-03, &
- 0.5014160E+01, 0.3900000E+00, 0.3556000E+01, 0.6870000E+01, &
- 0.4040000E+00, 0.1546000E+01, 0.8040000E+00, 0.5780000E+00, &
- 0.9760000E+00, 0.3776000E+00, 0.1000000E-03, 0.4800000E-01, &
- 0.1000000E-03, &
- 0.5014160E+01, 0.6500000E+00, 0.3956000E+01, 0.7370000E+01, &
- 0.4040000E+00, 0.1416000E+01, 0.9040000E+00, 0.4480000E+00, &
- 0.7760000E+00, 0.3776000E+00, 0.1000000E-03, 0.6800000E-01, &
- 0.1000000E-03, &
- 0.5014160E+01, 0.1580000E+01, 0.4856000E+01, 0.7570000E+01, &
- 0.9040000E+00, 0.1216000E+01, 0.1004000E+01, 0.2880000E+00, &
- 0.2760000E+00, 0.3776000E+00, 0.1000000E-03, 0.1580000E+00, &
- 0.1000000E-03, &
- 0.5014160E+01, 0.3380000E+01, 0.5456000E+01, 0.7770000E+01, &
- 0.1604000E+01, 0.1186000E+01, 0.1604000E+01, 0.2580000E+00, &
- 0.5760000E+00, 0.3776000E+00, 0.1000000E-03, 0.3380000E+00, &
- 0.1000000E-03, &
- 0.5014160E+01, 0.5080000E+01, 0.6156000E+01, 0.8070000E+01, &
- 0.2304000E+01, 0.1416000E+01, 0.3304000E+01, 0.2580000E+00, &
- 0.1760000E+00, 0.5076000E+00, 0.1000000E-03, 0.5080000E+00, &
- 0.1000000E-03, &
- 0.5014160E+01, 0.5380000E+01, 0.6456000E+01, 0.7870000E+01, &
- 0.4304000E+01, 0.2606000E+01, 0.4304000E+01, 0.2580000E+00, &
- 0.1760000E+00, 0.1737600E+01, 0.1000000E-03, 0.5380000E+00, &
- 0.1000000E-03, &
- 0.5014160E+01, 0.4880000E+01, 0.6456000E+01, 0.7670000E+01, &
- 0.2904000E+01, 0.5206000E+01, 0.3804000E+01, 0.8080000E+00, &
- 0.2760000E+00, 0.1937600E+01, 0.1000000E-03, 0.4880000E+00, &
- 0.1000000E-03, &
- 0.5014160E+01, 0.3780000E+01, 0.5756000E+01, 0.7570000E+01, &
- 0.2004000E+01, 0.4556000E+01, 0.1804000E+01, 0.1508000E+01, &
- 0.4760000E+00, 0.1477600E+01, 0.1000000E-03, 0.3780000E+00, &
- 0.1000000E-03, &
- 0.5014160E+01, 0.1630000E+01, 0.4556000E+01, 0.7370000E+01, &
- 0.1304000E+01, 0.3816000E+01, 0.1104000E+01, 0.1148000E+01, &
- 0.5760000E+00, 0.3776000E+00, 0.1000000E-03, 0.1680000E+00, &
- 0.1000000E-03, &
- 0.5014160E+01, 0.6500000E+00, 0.3256000E+01, 0.6870000E+01, &
- 0.8040000E+00, 0.2806000E+01, 0.9040000E+00, 0.7480000E+00, &
- 0.6760000E+00, 0.3776000E+00, 0.1000000E-03, 0.6800000E-01, &
- 0.1000000E-03, &
- 0.5014160E+01, 0.3900000E+00, 0.3256000E+01, 0.6570000E+01, &
- 0.5040000E+00, 0.1866000E+01, 0.8040000E+00, 0.5780000E+00, &
- 0.8760000E+00, 0.3776000E+00, 0.1000000E-03, 0.4800000E-01, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, 0.1000000E-03, &
- 0.1000000E-03/
- data z000/ &
- 0.2652970E+01, 0.5201000E+00, 0.5706300E+00, 0.1112210E+01, &
- 0.6414000E+00, 0.8427100E+00, 0.7771000E-01, 0.2446700E+00, &
- 0.6559000E-01, 0.7524000E-01, 0.1118000E-01, 0.1448500E+00, &
- 0.1011000E-01, &
- 0.2652970E+01, 0.5201000E+00, 0.5696600E+00, 0.1102780E+01, &
- 0.6414000E+00, 0.8087800E+00, 0.7779000E-01, 0.2446700E+00, &
- 0.6549000E-01, 0.7524000E-01, 0.1118000E-01, 0.1448500E+00, &
- 0.1011000E-01, &
- 0.2652970E+01, 0.6664900E+00, 0.5656600E+00, 0.1087660E+01, &
- 0.6414000E+00, 0.7875000E+00, 0.7785000E-01, 0.2272100E+00, &
- 0.6521000E-01, 0.7524000E-01, 0.1118000E-01, 0.1752100E+00, &
- 0.1011000E-01, &
- 0.2652970E+01, 0.9105300E+00, 0.5654400E+00, 0.1081830E+01, &
- 0.8633500E+00, 0.7284100E+00, 0.7788000E-01, 0.1998800E+00, &
- 0.6360000E-01, 0.7524000E-01, 0.1118000E-01, 0.2871900E+00, &
- 0.1011000E-01, &
- 0.2652970E+01, 0.1031200E+01, 0.5592300E+00, 0.1076120E+01, &
- 0.9728300E+00, 0.7284100E+00, 0.7779000E-01, 0.1998800E+00, &
- 0.6480000E-01, 0.7524000E-01, 0.1118000E-01, 0.4302000E+00, &
- 0.1011000E-01, &
- 0.2652970E+01, 0.1043680E+01, 0.5524400E+00, 0.1067790E+01, &
- 0.1005600E+01, 0.7875000E+00, 0.7712000E-01, 0.1998800E+00, &
- 0.6331000E-01, 0.7575000E-01, 0.1118000E-01, 0.5087600E+00, &
- 0.1011000E-01, &
- 0.2652970E+01, 0.1041940E+01, 0.5497000E+00, 0.1073310E+01, &
- 0.9967700E+00, 0.9266800E+00, 0.7594000E-01, 0.1998800E+00, &
- 0.6331000E-01, 0.7767000E-01, 0.1118000E-01, 0.5200300E+00, &
- 0.1011000E-01, &
- 0.2652970E+01, 0.1037530E+01, 0.5497000E+00, 0.1078960E+01, &
- 0.1011190E+01, 0.9715300E+00, 0.7658000E-01, 0.2674000E+00, &
- 0.6360000E-01, 0.7782000E-01, 0.1118000E-01, 0.5009500E+00, &
- 0.1011000E-01, &
- 0.2652970E+01, 0.1036510E+01, 0.5562600E+00, 0.1081830E+01, &
- 0.9965000E+00, 0.9658800E+00, 0.7776000E-01, 0.2923300E+00, &
- 0.6446000E-01, 0.7745000E-01, 0.1118000E-01, 0.4503800E+00, &
- 0.1011000E-01, &
- 0.2652970E+01, 0.9170700E+00, 0.5686600E+00, 0.1087660E+01, &
- 0.9386100E+00, 0.9555100E+00, 0.7790000E-01, 0.2803400E+00, &
- 0.6480000E-01, 0.7524000E-01, 0.1118000E-01, 0.2973700E+00, &
- 0.1011000E-01, &
- 0.2652970E+01, 0.6664900E+00, 0.5725100E+00, 0.1102780E+01, &
- 0.8346400E+00, 0.9204000E+00, 0.7785000E-01, 0.2580600E+00, &
- 0.6510000E-01, 0.7524000E-01, 0.1118000E-01, 0.1752100E+00, &
- 0.1011000E-01, &
- 0.2652970E+01, 0.5201000E+00, 0.5725100E+00, 0.1112210E+01, &
- 0.7049800E+00, 0.8427100E+00, 0.7779000E-01, 0.2446700E+00, &
- 0.6537000E-01, 0.7524000E-01, 0.1118000E-01, 0.1448500E+00, &
- 0.1011000E-01/
- data d0/ &
- 0.2737261E+02, 0.1366377E+02, 0.1813464E+02, 0.1376361E+02, &
- 0.9193320E+01, 0.1390777E+02, 0.2185200E+00, 0.2812600E+01, &
- 0.1638000E+00, 0.1062900E+00, 0.6000000E-04, 0.6314240E+01, &
- 0.4000000E-04, &
- 0.2737261E+02, 0.1366377E+02, 0.1814677E+02, 0.1380041E+02, &
- 0.9193320E+01, 0.1376090E+02, 0.2265800E+00, 0.2812600E+01, &
- 0.1548100E+00, 0.1062900E+00, 0.6000000E-04, 0.6314240E+01, &
- 0.4000000E-04, &
- 0.2737261E+02, 0.1461883E+02, 0.1819051E+02, 0.1385740E+02, &
- 0.9193320E+01, 0.1367074E+02, 0.2332800E+00, 0.2662290E+01, &
- 0.1343400E+00, 0.1062900E+00, 0.6000000E-04, 0.7639520E+01, &
- 0.4000000E-04, &
- 0.2737261E+02, 0.1569677E+02, 0.1825890E+02, 0.1387880E+02, &
- 0.9903400E+01, 0.1344527E+02, 0.2389500E+00, 0.2390910E+01, &
- 0.6191000E-01, 0.1062900E+00, 0.6000000E-04, 0.1070958E+02, &
- 0.4000000E-04, &
- 0.2737261E+02, 0.1632865E+02, 0.1829956E+02, 0.1389946E+02, &
- 0.1030010E+02, 0.1344527E+02, 0.2605400E+00, 0.2390910E+01, &
- 0.1096800E+00, 0.1062900E+00, 0.6000000E-04, 0.1278272E+02, &
- 0.4000000E-04, &
- 0.2737261E+02, 0.1662263E+02, 0.1833903E+02, 0.1392915E+02, &
- 0.1053455E+02, 0.1367074E+02, 0.2988000E+00, 0.2390910E+01, &
- 0.5103000E-01, 0.1229900E+00, 0.6000000E-04, 0.1356813E+02, &
- 0.4000000E-04, &
- 0.2737261E+02, 0.1666297E+02, 0.1835387E+02, 0.1390953E+02, &
- 0.1091967E+02, 0.1425275E+02, 0.3251800E+00, 0.2390910E+01, &
- 0.5103000E-01, 0.2152100E+00, 0.6000000E-04, 0.1366182E+02, &
- 0.4000000E-04, &
- 0.2737261E+02, 0.1660123E+02, 0.1835387E+02, 0.1388922E+02, &
- 0.1068047E+02, 0.1459719E+02, 0.3130700E+00, 0.2974600E+01, &
- 0.6191000E-01, 0.2289700E+00, 0.6000000E-04, 0.1349985E+02, &
- 0.4000000E-04, &
- 0.2737261E+02, 0.1641343E+02, 0.1831739E+02, 0.1387880E+02, &
- 0.1044517E+02, 0.1452246E+02, 0.2649800E+00, 0.3137710E+01, &
- 0.9547000E-01, 0.1996100E+00, 0.6000000E-04, 0.1301951E+02, &
- 0.4000000E-04, &
- 0.2737261E+02, 0.1572679E+02, 0.1823553E+02, 0.1385740E+02, &
- 0.1016423E+02, 0.1443002E+02, 0.2438100E+00, 0.3062460E+01, &
- 0.1096800E+00, 0.1062900E+00, 0.6000000E-04, 0.1090759E+02, &
- 0.4000000E-04, &
- 0.2737261E+02, 0.1461883E+02, 0.1810866E+02, 0.1380041E+02, &
- 0.9814290E+01, 0.1422050E+02, 0.2332800E+00, 0.2907360E+01, &
- 0.1225000E+00, 0.1062900E+00, 0.6000000E-04, 0.7639520E+01, &
- 0.4000000E-04, &
- 0.2737261E+02, 0.1366377E+02, 0.1810866E+02, 0.1376361E+02, &
- 0.9417390E+01, 0.1390777E+02, 0.2265800E+00, 0.2812600E+01, &
- 0.1450200E+00, 0.1062900E+00, 0.6000000E-04, 0.6314240E+01, &
- 0.4000000E-04/
- data z10/ &
- 0.1000000E+01, 0.1150000E+02, 0.1600000E+02, 0.8500000E+01, &
- 0.7000000E+01, 0.1000000E+02, 0.1000000E+00, 0.2000000E+01, &
- 0.1000000E+00, 0.1000000E+00, 0.1000000E-01, 0.1150000E+02, &
- 0.1000000E-03, &
- 0.1000000E+01, 0.1150000E+02, 0.1600000E+02, 0.8500000E+01, &
- 0.7000000E+01, 0.1000000E+02, 0.1000000E+00, 0.2000000E+01, &
- 0.1000000E+00, 0.1000000E+00, 0.1000000E-01, 0.1150000E+02, &
- 0.1000000E-03, &
- 0.1000000E+01, 0.1150000E+02, 0.1600000E+02, 0.8500000E+01, &
- 0.7000000E+01, 0.1000000E+02, 0.1000000E+00, 0.2000000E+01, &
- 0.1000000E+00, 0.1000000E+00, 0.1000000E-01, 0.1150000E+02, &
- 0.1000000E-03, &
- 0.1000000E+01, 0.1150000E+02, 0.1600000E+02, 0.8500000E+01, &
- 0.7000000E+01, 0.1000000E+02, 0.1000000E+00, 0.2000000E+01, &
- 0.1000000E+00, 0.1000000E+00, 0.1000000E-01, 0.1150000E+02, &
- 0.1000000E-03, &
- 0.1000000E+01, 0.1150000E+02, 0.1600000E+02, 0.8500000E+01, &
- 0.7000000E+01, 0.1000000E+02, 0.1000000E+00, 0.2000000E+01, &
- 0.1000000E+00, 0.1000000E+00, 0.1000000E-01, 0.1150000E+02, &
- 0.1000000E-03, &
- 0.1000000E+01, 0.1150000E+02, 0.1600000E+02, 0.8500000E+01, &
- 0.7000000E+01, 0.1000000E+02, 0.1000000E+00, 0.2000000E+01, &
- 0.1000000E+00, 0.1000000E+00, 0.1000000E-01, 0.1150000E+02, &
- 0.1000000E-03, &
- 0.1000000E+01, 0.1150000E+02, 0.1600000E+02, 0.8500000E+01, &
- 0.7000000E+01, 0.1000000E+02, 0.1000000E+00, 0.2000000E+01, &
- 0.1000000E+00, 0.1000000E+00, 0.1000000E-01, 0.1150000E+02, &
- 0.1000000E-03, &
- 0.1000000E+01, 0.1150000E+02, 0.1600000E+02, 0.8500000E+01, &
- 0.7000000E+01, 0.1000000E+02, 0.1000000E+00, 0.2000000E+01, &
- 0.1000000E+00, 0.1000000E+00, 0.1000000E-01, 0.1150000E+02, &
- 0.1000000E-03, &
- 0.1000000E+01, 0.1150000E+02, 0.1600000E+02, 0.8500000E+01, &
- 0.7000000E+01, 0.1000000E+02, 0.1000000E+00, 0.2000000E+01, &
- 0.1000000E+00, 0.1000000E+00, 0.1000000E-01, 0.1150000E+02, &
- 0.1000000E-03, &
- 0.1000000E+01, 0.1150000E+02, 0.1600000E+02, 0.8500000E+01, &
- 0.7000000E+01, 0.1000000E+02, 0.1000000E+00, 0.2000000E+01, &
- 0.1000000E+00, 0.1000000E+00, 0.1000000E-01, 0.1150000E+02, &
- 0.1000000E-03, &
- 0.1000000E+01, 0.1150000E+02, 0.1600000E+02, 0.8500000E+01, &
- 0.7000000E+01, 0.1000000E+02, 0.1000000E+00, 0.2000000E+01, &
- 0.1000000E+00, 0.1000000E+00, 0.1000000E-01, 0.1150000E+02, &
- 0.1000000E-03, &
- 0.1000000E+01, 0.1150000E+02, 0.1600000E+02, 0.8500000E+01, &
- 0.7000000E+01, 0.1000000E+02, 0.1000000E+00, 0.2000000E+01, &
- 0.1000000E+00, 0.1000000E+00, 0.1000000E-01, 0.1150000E+02, &
- 0.1000000E-03/
- data z20/ &
- 0.3500000E+02, 0.2000000E+02, 0.2000000E+02, 0.1700000E+02, &
- 0.1400000E+02, 0.1800000E+02, 0.6000000E+00, 0.5000000E+01, &
- 0.5000000E+00, 0.6000000E+00, 0.1000000E+00, 0.2000000E+02, &
- 0.1000000E+00, &
- 0.3500000E+02, 0.2000000E+02, 0.2000000E+02, 0.1700000E+02, &
- 0.1400000E+02, 0.1800000E+02, 0.6000000E+00, 0.5000000E+01, &
- 0.5000000E+00, 0.6000000E+00, 0.1000000E+00, 0.2000000E+02, &
- 0.1000000E+00, &
- 0.3500000E+02, 0.2000000E+02, 0.2000000E+02, 0.1700000E+02, &
- 0.1400000E+02, 0.1800000E+02, 0.6000000E+00, 0.5000000E+01, &
- 0.5000000E+00, 0.6000000E+00, 0.1000000E+00, 0.2000000E+02, &
- 0.1000000E+00, &
- 0.3500000E+02, 0.2000000E+02, 0.2000000E+02, 0.1700000E+02, &
- 0.1400000E+02, 0.1800000E+02, 0.6000000E+00, 0.5000000E+01, &
- 0.5000000E+00, 0.6000000E+00, 0.1000000E+00, 0.2000000E+02, &
- 0.1000000E+00, &
- 0.3500000E+02, 0.2000000E+02, 0.2000000E+02, 0.1700000E+02, &
- 0.1400000E+02, 0.1800000E+02, 0.6000000E+00, 0.5000000E+01, &
- 0.5000000E+00, 0.6000000E+00, 0.1000000E+00, 0.2000000E+02, &
- 0.1000000E+00, &
- 0.3500000E+02, 0.2000000E+02, 0.2000000E+02, 0.1700000E+02, &
- 0.1400000E+02, 0.1800000E+02, 0.6000000E+00, 0.5000000E+01, &
- 0.5000000E+00, 0.6000000E+00, 0.1000000E+00, 0.2000000E+02, &
- 0.1000000E+00, &
- 0.3500000E+02, 0.2000000E+02, 0.2000000E+02, 0.1700000E+02, &
- 0.1400000E+02, 0.1800000E+02, 0.6000000E+00, 0.5000000E+01, &
- 0.5000000E+00, 0.6000000E+00, 0.1000000E+00, 0.2000000E+02, &
- 0.1000000E+00, &
- 0.3500000E+02, 0.2000000E+02, 0.2000000E+02, 0.1700000E+02, &
- 0.1400000E+02, 0.1800000E+02, 0.6000000E+00, 0.5000000E+01, &
- 0.5000000E+00, 0.6000000E+00, 0.1000000E+00, 0.2000000E+02, &
- 0.1000000E+00, &
- 0.3500000E+02, 0.2000000E+02, 0.2000000E+02, 0.1700000E+02, &
- 0.1400000E+02, 0.1800000E+02, 0.6000000E+00, 0.5000000E+01, &
- 0.5000000E+00, 0.6000000E+00, 0.1000000E+00, 0.2000000E+02, &
- 0.1000000E+00, &
- 0.3500000E+02, 0.2000000E+02, 0.2000000E+02, 0.1700000E+02, &
- 0.1400000E+02, 0.1800000E+02, 0.6000000E+00, 0.5000000E+01, &
- 0.5000000E+00, 0.6000000E+00, 0.1000000E+00, 0.2000000E+02, &
- 0.1000000E+00, &
- 0.3500000E+02, 0.2000000E+02, 0.2000000E+02, 0.1700000E+02, &
- 0.1400000E+02, 0.1800000E+02, 0.6000000E+00, 0.5000000E+01, &
- 0.5000000E+00, 0.6000000E+00, 0.1000000E+00, 0.2000000E+02, &
- 0.1000000E+00, &
- 0.3500000E+02, 0.2000000E+02, 0.2000000E+02, 0.1700000E+02, &
- 0.1400000E+02, 0.1800000E+02, 0.6000000E+00, 0.5000000E+01, &
- 0.5000000E+00, 0.6000000E+00, 0.1000000E+00, 0.2000000E+02, &
- 0.1000000E+00/
- data rdc0/ &
- 0.2858700E+03, 0.2113200E+03, 0.2985200E+03, 0.5654100E+03, &
- 0.1852000E+03, 0.2301300E+03, 0.2443000E+02, 0.1036000E+03, &
- 0.2311000E+02, 0.2286000E+02, 0.2376000E+02, 0.1949000E+03, &
- 0.2850000E+02, &
- 0.2858700E+03, 0.2113200E+03, 0.3013500E+03, 0.5870500E+03, &
- 0.1852000E+03, 0.2244200E+03, 0.2463000E+02, 0.1036000E+03, &
- 0.2294000E+02, 0.2286000E+02, 0.2376000E+02, 0.1949000E+03, &
- 0.2850000E+02, &
- 0.2858700E+03, 0.2187800E+03, 0.3124600E+03, 0.6234600E+03, &
- 0.1852000E+03, 0.2215700E+03, 0.2480000E+02, 0.1023500E+03, &
- 0.2262000E+02, 0.2286000E+02, 0.2376000E+02, 0.1964400E+03, &
- 0.2850000E+02, &
- 0.2858700E+03, 0.2434000E+03, 0.3312300E+03, 0.6381300E+03, &
- 0.2048700E+03, 0.2164100E+03, 0.2496000E+02, 0.1007200E+03, &
- 0.2189000E+02, 0.2286000E+02, 0.2376000E+02, 0.2014400E+03, &
- 0.2850000E+02, &
- 0.2858700E+03, 0.2948700E+03, 0.3458300E+03, 0.6528600E+03, &
- 0.2330100E+03, 0.2164100E+03, 0.2572000E+02, 0.1007200E+03, &
- 0.2230000E+02, 0.2286000E+02, 0.2376000E+02, 0.2071300E+03, &
- 0.2850000E+02, &
- 0.2858700E+03, 0.3459000E+03, 0.3619400E+03, 0.6750500E+03, &
- 0.2620800E+03, 0.2215700E+03, 0.2774000E+02, 0.1007200E+03, &
- 0.2182000E+02, 0.2301000E+02, 0.2376000E+02, 0.2107900E+03, &
- 0.2850000E+02, &
- 0.2858700E+03, 0.3551800E+03, 0.3685400E+03, 0.6602400E+03, &
- 0.3443100E+03, 0.2500700E+03, 0.3006000E+02, 0.1007200E+03, &
- 0.2182000E+02, 0.2436000E+02, 0.2376000E+02, 0.2113100E+03, &
- 0.2850000E+02, &
- 0.2858700E+03, 0.3418400E+03, 0.3685400E+03, 0.6454900E+03, &
- 0.2870900E+03, 0.2885700E+03, 0.2886000E+02, 0.1053000E+03, &
- 0.2189000E+02, 0.2469000E+02, 0.2376000E+02, 0.2104200E+03, &
- 0.2850000E+02, &
- 0.2858700E+03, 0.3072200E+03, 0.3528500E+03, 0.6381300E+03, &
- 0.2495800E+03, 0.2780300E+03, 0.2590000E+02, 0.1079400E+03, &
- 0.2216000E+02, 0.2404000E+02, 0.2376000E+02, 0.2081500E+03, &
- 0.2850000E+02, &
- 0.2858700E+03, 0.2448400E+03, 0.3236500E+03, 0.6231300E+03, &
- …
Large files files are truncated, but you can click here to view the full file