|
| logical | vardsv::ini_sv =.false. |
| |
| real, parameter | vardsv::eps_21 =1.e-21 |
| |
| integer, dimension(1:5), parameter | vardsv::istdsv =(/1,2,3,4,5/) |
| |
| real, parameter | vardsv::cn_dsv = 2105. |
| |
| real, parameter | vardsv::smndsv = 1.00 |
| |
| real, parameter | vardsv::g1_dsv = 99. |
| |
| real, parameter | vardsv::ddcdsv = 1. |
| |
| real, parameter | vardsv::dfcdsv = 4. |
| |
| real, parameter | vardsv::dscdsv = 3. |
| |
| real, parameter | vardsv::adsdsv = 4. |
| |
| real, parameter | vardsv::so1dsv = 0.580 |
| |
| real, parameter | vardsv::so2dsv = 0.320 |
| |
| real, parameter | vardsv::so3dsv = 0.100 |
| |
| real, parameter | vardsv::ai1dsv = 0.40 |
| |
| real, parameter | vardsv::ai2dsv = 0.45 |
| |
| real, parameter | vardsv::ai3dsv = 0.65 |
| |
| real, parameter | vardsv::ws0dsv = 0.07 |
| |
| real, parameter | vardsv::rocdsv = 800. |
| |
| real, parameter | vardsv::ru_dsv = 200. |
| |
| real, parameter | vardsv::cdidsv = 2.1 |
| |
| integer, parameter | vardsv::nvgt =12 |
| |
| real, dimension(0:nvgt), parameter | vardsv::dh_dsv = (/ 0.00, 0.07, 0.21, 0.70, 0.07, 0.21, 0.70, 1.40, 5.60,14.00, 1.40, 5.60,14.00/) |
| |
| real, dimension(0:nvgt), parameter | vardsv::z0mdsv = (/ 0.01, 0.01, 0.03, 0.10, 0.01, 0.03, 0.10, 0.20, 0.80, 2.00, 0.20, 0.80, 2.00/) |
| |
| real, dimension(0:nvgt), parameter | vardsv::stodsv = (/5000., 50., 50., 50., 50., 50., 50., 10., 10., 10., 10., 10., 10./) |
| |
| real, dimension(0:nvgt), parameter | vardsv::pr_dsv = (/ 0.0,0.5e9,0.5e9, 0.5e9,0.5e9,0.5e9,0.5e9,1.0e9,1.0e9,1.0e9,1.0e9,1.0e9,1.0e9/) |
| |
| real, dimension(0:nvgt), parameter | vardsv::rbtdsv = (/0.000,0.961,0.961, 0.961,0.943,0.964,0.972,0.968,0.962,0.962,0.971,0.976,0.976/) |
| |
| real, parameter | vardsv::pscdsv = 250. |
| |
| real, parameter | vardsv::stxdsv = 5000. |
| |
| real, parameter | vardsv::laidsv = 4. |
| |
| real, parameter | vardsv::rcwdsv = 4.180e+6 |
| |
| real, dimension(-nsol:0) | vardsv::dz_dsv |
| |
| real | vardsv::zz_dsv |
| |
| integer, parameter | vardsv::nsot =12 |
| |
| real, dimension(0:nsot), parameter | vardsv::etadsv = (/ 1.000,0.395,0.410, 0.435,0.485,0.451,0.420,0.477,0.476,0.426,0.492,0.482,0.001 /) |
| |
| real, dimension(0:nsot), parameter | vardsv::psidsv = (/ 1.000,0.121,0.090, 0.218,0.786,0.478,0.299,0.356,0.630,0.153,0.490,0.405,0.001 /) |
| |
| real, dimension(0:nsot), parameter | vardsv::ks_dsv = (/ 0.e00, 176.0e-6, 156.3e-6, 34.1e-6, 7.2e-6, 7.0e-6, 6.3e-6, 1.7e-6, 2.5e-6, 2.2e-6, 1.0e-6, 1.3e-6,0.0e0 /) |
| |
| real, dimension(0:nsot), parameter | vardsv::bchdsv = (/ 1.00, 4.05, 4.38, 4.90, 5.30, 5.39, 7.12, 7.75, 8.52,10.40,10.40,11.40, 0.02 /) |
| |
| real, parameter | vardsv::vk_dsv = 1000. |
| |
| real, parameter | vardsv::tsidsv = 0.50 |
| |
| integer | vardsv::ivg1 |
| |
| integer | vardsv::iso1 |
| |
1.8.9.1 
