vardsv Module Reference

Variables
logical	ini_sv =.false.
real, parameter	eps_21 =1.e-21
integer, dimension(1:5), parameter	istdsv =(/1,2,3,4,5/)
real, parameter	cn_dsv = 2105.
real, parameter	smndsv = 1.00
real, parameter	g1_dsv = 99.
real, parameter	ddcdsv = 1.
real, parameter	dfcdsv = 4.
real, parameter	dscdsv = 3.
real, parameter	adsdsv = 4.
real, parameter	so1dsv = 0.580
real, parameter	so2dsv = 0.320
real, parameter	so3dsv = 0.100
real, parameter	ai1dsv = 0.40
real, parameter	ai2dsv = 0.45
real, parameter	ai3dsv = 0.65
real, parameter	ws0dsv = 0.07
real, parameter	rocdsv = 800.
real, parameter	ru_dsv = 200.
real, parameter	cdidsv = 2.1
integer, parameter	nvgt =12
real, dimension(0:nvgt), parameter	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	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	stodsv = (/5000., 50., 50., 50., 50., 50., 50., 10., 10., 10., 10., 10., 10./)
real, dimension(0:nvgt), parameter	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	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	pscdsv = 250.
real, parameter	stxdsv = 5000.
real, parameter	laidsv = 4.
real, parameter	rcwdsv = 4.180e+6
real, dimension(-nsol:0)	dz_dsv
real	zz_dsv
integer, parameter	nsot =12
real, dimension(0:nsot), parameter	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	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	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	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	vk_dsv = 1000.
real, parameter	tsidsv = 0.50
integer	ivg1
integer	iso1

Variable Documentation

real, parameter vardsv::adsdsv = 4.

Definition at line 25 of file VARdSV.F90.

real, parameter vardsv::ai1dsv = 0.40

Definition at line 32 of file VARdSV.F90.

real, parameter vardsv::ai2dsv = 0.45

Definition at line 32 of file VARdSV.F90.

real, parameter vardsv::ai3dsv = 0.65

Definition at line 32 of file VARdSV.F90.

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 /)

Definition at line 111 of file VARdSV.F90.

real, parameter vardsv::cdidsv = 2.1

Definition at line 43 of file VARdSV.F90.

real, parameter vardsv::cn_dsv = 2105.

Definition at line 20 of file VARdSV.F90.

real, parameter vardsv::ddcdsv = 1.

Definition at line 23 of file VARdSV.F90.

real, parameter vardsv::dfcdsv = 4.

Definition at line 23 of file VARdSV.F90.

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/)

Definition at line 49 of file VARdSV.F90.

real, parameter vardsv::dscdsv = 3.

Definition at line 23 of file VARdSV.F90.

real, dimension(-nsol:0) vardsv::dz_dsv

Definition at line 92 of file VARdSV.F90.

real, parameter vardsv::eps_21 =1.e-21

Definition at line 12 of file VARdSV.F90.

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 /)

Definition at line 98 of file VARdSV.F90.

real, parameter vardsv::g1_dsv = 99.

Definition at line 22 of file VARdSV.F90.

logical vardsv::ini_sv =.false.

Definition at line 11 of file VARdSV.F90.

integer vardsv::iso1

Definition at line 137 of file VARdSV.F90.

integer, dimension(1:5), parameter vardsv::istdsv =(/1,2,3,4,5/)

Definition at line 18 of file VARdSV.F90.

integer vardsv::ivg1

Definition at line 137 of file VARdSV.F90.

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 /)

Definition at line 106 of file VARdSV.F90.

real, parameter vardsv::laidsv = 4.

Definition at line 85 of file VARdSV.F90.

integer, parameter vardsv::nsot =12

Definition at line 97 of file VARdSV.F90.

integer, parameter vardsv::nvgt =12

Definition at line 48 of file VARdSV.F90.

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/)

Definition at line 61 of file VARdSV.F90.

real, parameter vardsv::pscdsv = 250.

Definition at line 83 of file VARdSV.F90.

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 /)

Definition at line 102 of file VARdSV.F90.

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/)

Definition at line 65 of file VARdSV.F90.

real, parameter vardsv::rcwdsv = 4.180e+6

Definition at line 91 of file VARdSV.F90.

real, parameter vardsv::rocdsv = 800.

Definition at line 37 of file VARdSV.F90.

real, parameter vardsv::ru_dsv = 200.

Definition at line 38 of file VARdSV.F90.

real, parameter vardsv::smndsv = 1.00

Definition at line 21 of file VARdSV.F90.

real, parameter vardsv::so1dsv = 0.580

Definition at line 26 of file VARdSV.F90.

real, parameter vardsv::so2dsv = 0.320

Definition at line 26 of file VARdSV.F90.

real, parameter vardsv::so3dsv = 0.100

Definition at line 26 of file VARdSV.F90.

real, dimension(0:nvgt), parameter vardsv::stodsv = (/5000., 50., 50., 50., 50., 50., 50., 10., 10., 10., 10., 10., 10./)

Definition at line 57 of file VARdSV.F90.

real, parameter vardsv::stxdsv = 5000.

Definition at line 84 of file VARdSV.F90.

real, parameter vardsv::tsidsv = 0.50

Definition at line 135 of file VARdSV.F90.

real, parameter vardsv::vk_dsv = 1000.

Definition at line 134 of file VARdSV.F90.

real, parameter vardsv::ws0dsv = 0.07

Definition at line 36 of file VARdSV.F90.

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/)

Definition at line 53 of file VARdSV.F90.

real vardsv::zz_dsv

Definition at line 95 of file VARdSV.F90.