[2089] | 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 |
---|