Go to the source code of this file.
Functions/Subroutines | |
subroutine | glt_thermo_lead_r (tpdom, pustar, tpmxl, tpatm, tpblkw, tpdia, tptfl, tpsit, tpsil, tpldsit, tpldsil) |
subroutine glt_thermo_lead_r | ( | type(t_dom), dimension(np), intent(in) | tpdom, |
real, dimension(np), intent(in) | pustar, | ||
type(t_mxl), dimension(np), intent(inout) | tpmxl, | ||
type(t_atm), dimension(np), intent(in) | tpatm, | ||
type(t_blk), dimension(np), intent(inout) | tpblkw, | ||
type(t_dia), dimension(np), intent(inout) | tpdia, | ||
type(t_tfl), dimension(np), intent(inout) | tptfl, | ||
type(t_sit), dimension(nt,np), intent(inout) | tpsit, | ||
type(t_vtp), dimension(nl,nt,np), intent(inout) | tpsil, | ||
type(t_sit), dimension(nt,np), intent(out) | tpldsit, | ||
type(t_vtp), dimension(nl,nt,np), intent(out) | tpldsil | ||
) |
Definition at line 104 of file modi_glt_thermo_lead_r.F90.