subroutine, public module_soil_pre::init_soil_3_real |
( |
real, dimension(ims:ime,jms:jme), intent(inout) |
tsk, |
|
|
real, dimension(ims:ime,jms:jme), intent(in) |
tmn, |
|
|
real, dimension(ims:ime,num_soil_layers,jms:jme), intent(out) |
smois, |
|
|
real, dimension(ims:ime,num_soil_layers,jms:jme), intent(out) |
tslb, |
|
|
real, dimension(ims:ime,1:num_st_levels_alloc,jms:jme), intent(inout) |
st_input, |
|
|
real, dimension(ims:ime,1:num_sm_levels_alloc,jms:jme), intent(inout) |
sm_input, |
|
|
real, dimension(ims:ime,jms:jme), intent(in) |
landmask, |
|
|
real, dimension(ims:ime,jms:jme), intent(in) |
sst, |
|
|
real, dimension(num_soil_layers) |
zs, |
|
|
real, dimension(num_soil_layers) |
dzs, |
|
|
integer, dimension(1:num_st_levels_input), intent(inout) |
st_levels_input, |
|
|
integer, dimension(1:num_sm_levels_input), intent(inout) |
sm_levels_input, |
|
|
integer, intent(in) |
num_soil_layers, |
|
|
integer, intent(in) |
num_st_levels_input, |
|
|
integer, intent(in) |
num_sm_levels_input, |
|
|
integer, intent(in) |
num_st_levels_alloc, |
|
|
integer, intent(in) |
num_sm_levels_alloc, |
|
|
integer, intent(in) |
flag_sst, |
|
|
integer, intent(in) |
flag_soil_layers, |
|
|
integer, intent(in) |
flag_soil_levels, |
|
|
integer, intent(in) |
ids, |
|
|
integer, intent(in) |
ide, |
|
|
integer, intent(in) |
jds, |
|
|
integer, intent(in) |
jde, |
|
|
integer, intent(in) |
kds, |
|
|
integer, intent(in) |
kde, |
|
|
integer, intent(in) |
ims, |
|
|
integer, intent(in) |
ime, |
|
|
integer, intent(in) |
jms, |
|
|
integer, intent(in) |
jme, |
|
|
integer, intent(in) |
kms, |
|
|
integer, intent(in) |
kme, |
|
|
integer, intent(in) |
its, |
|
|
integer, intent(in) |
ite, |
|
|
integer, intent(in) |
jts, |
|
|
integer, intent(in) |
jte, |
|
|
integer, intent(in) |
kts, |
|
|
integer, intent(in) |
kte |
|
) |
| |