|
CAM
|
Functions/Subroutines | |
| subroutine, public | init_tms (kind, oro_in, z0fac_in, karman_in, gravit_in, rair_in, errstring) |
| subroutine, public | compute_tms (pcols, pver, ncol, u, v, t, pmid, exner, zm, sgh, ksrf, taux, tauy, landfrac) |
Variables | |
| integer, parameter | r8 = selected_real_kind(12) |
| real(r8), parameter | horomin = 1._r8 |
| real(r8), parameter | z0max = 100._r8 |
| real(r8), parameter | dv2min = 0.01_r8 |
| real(r8) | orocnst |
| real(r8) | z0fac |
| real(r8) | karman |
| real(r8) | gravit |
| real(r8) | rair |
| subroutine, public trb_mtn_stress::compute_tms | ( | integer, intent(in) | pcols, |
| integer, intent(in) | pver, | ||
| integer, intent(in) | ncol, | ||
| real(r8), dimension(pcols,pver), intent(in) | u, | ||
| real(r8), dimension(pcols,pver), intent(in) | v, | ||
| real(r8), dimension(pcols,pver), intent(in) | t, | ||
| real(r8), dimension(pcols,pver), intent(in) | pmid, | ||
| real(r8), dimension(pcols,pver), intent(in) | exner, | ||
| real(r8), dimension(pcols,pver), intent(in) | zm, | ||
| real(r8), dimension(pcols), intent(in) | sgh, | ||
| real(r8), dimension(pcols), intent(out) | ksrf, | ||
| real(r8), dimension(pcols), intent(out) | taux, | ||
| real(r8), dimension(pcols), intent(out) | tauy, | ||
| real(r8), dimension(pcols), intent(in) | landfrac | ||
| ) |

| subroutine, public trb_mtn_stress::init_tms | ( | integer, intent(in) | kind, |
| real(r8), intent(in) | oro_in, | ||
| real(r8), intent(in) | z0fac_in, | ||
| real(r8), intent(in) | karman_in, | ||
| real(r8), intent(in) | gravit_in, | ||
| real(r8), intent(in) | rair_in, | ||
| character(len=*), intent(out) | errstring | ||
| ) |

|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |
|
private |