| subroutine module_mp_tempo_main::melting |
( |
real(wp), dimension(:), intent(in) |
rhof2, |
|
|
real(wp), dimension(:), intent(in) |
rho, |
|
|
real(wp), dimension(:), intent(in) |
temp, |
|
|
real(wp), dimension(:), intent(in) |
qvsi, |
|
|
real(wp), dimension(:), intent(in) |
tcond, |
|
|
real(wp), dimension(:), intent(in) |
diffu, |
|
|
real(wp), dimension(:), intent(in) |
vsc2, |
|
|
real(wp), dimension(:), intent(in) |
ssati, |
|
|
real(wp), dimension(:), intent(in) |
delqvs, |
|
|
logical, dimension(:), intent(in) |
l_qs, |
|
|
real(wp), dimension(:), intent(in) |
rs, |
|
|
real(dp), dimension(:), intent(in) |
smof, |
|
|
real(dp), dimension(:), intent(in) |
smo0, |
|
|
real(dp), dimension(:), intent(in) |
smo1, |
|
|
logical, dimension(:), intent(in) |
l_qg, |
|
|
real(wp), dimension(:), intent(in) |
rg, |
|
|
real(wp), dimension(:), intent(in) |
ng, |
|
|
real(dp), dimension(:), intent(in) |
ilamg, |
|
|
integer, dimension(:), intent(in) |
idx, |
|
|
type(ty_tend), intent(inout) |
tend, |
|
|
real(wp), intent(in) |
dt, |
|
|
real(wp), intent(in) |
odt |
|
) |
| |
|
private |