1 | module Mod_SISVAT_dzS |
---|
2 | |
---|
3 | use Mod_Real |
---|
4 | |
---|
5 | |
---|
6 | implicit none |
---|
7 | |
---|
8 | |
---|
9 | integer, SAVE ,ALLOCATABLE ,dimension(:) :: islpSV |
---|
10 | integer, SAVE ,ALLOCATABLE ,dimension(:) :: isnpSV |
---|
11 | integer, SAVE ,ALLOCATABLE ,dimension(:) :: islmSV |
---|
12 | |
---|
13 | real(kind=real8), SAVE :: Implic,Explic |
---|
14 | real(kind=real8), SAVE :: OcndSV ! Swab Ocean / Soil Ratio |
---|
15 | real(kind=real8), SAVE ,ALLOCATABLE ,dimension(:) :: dzmiSV ! dz_(i-1/2) |
---|
16 | real(kind=real8), SAVE ,ALLOCATABLE ,dimension(:) :: dzi_SV ! dz_(i-1)/(dz_(i)+dz_(i-1)) |
---|
17 | real(kind=real8), SAVE ,ALLOCATABLE ,dimension(:) :: dziiSV ! dz_(i) /(dz_(i)+dz_(i-1)) |
---|
18 | real(kind=real8), SAVE ,ALLOCATABLE ,dimension(:) :: dtz_SV ! dt / dz |
---|
19 | real(kind=real8), SAVE ,ALLOCATABLE ,dimension(:) :: dz78SV ! 7/8 (dz) |
---|
20 | real(kind=real8), SAVE ,ALLOCATABLE ,dimension(:) :: dz34SV ! 3/4 (dz) |
---|
21 | real(kind=real8), SAVE ,ALLOCATABLE ,dimension(:) :: dz_8SV ! 1/8 (dz) |
---|
22 | real(kind=real8), SAVE ,ALLOCATABLE ,dimension(:) :: dzAvSV ! 1/8dz_(-1)+3/4dz+1/8dz_(+1) |
---|
23 | real(kind=real8), SAVE ,ALLOCATABLE ,dimension(:,:) :: RF__SV ! 1/8dz_(-1)+3/4dz+1/8dz_(+1) |
---|
24 | |
---|
25 | end module Mod_SISVAT_dzS |
---|