Index

Rundeck: P1SoM40

Created: Fri May 10 03:30:18 EDT 2024

stars

Module: SOCPBL

File: PBL.f

Summary: computes the friction speed, ustar, the virtual potential temperature scale, tstar, and the specific humidity scale, qstar. Note that surface momentum flux = ustar*ustar surface heat flux = ustar*tstar surface moisture flux = ustar*qstar It also calculates and outputs the Monin-Obukov length, lmonin, the roughness lengths (z0m,z0h,z0q), the drag coefficient (cm), the Stanton number (ch) and the Dalton number (cq) by calling subroutine dflux.
Author : Ye Cheng/G. Hartke (modifications by G. Schmidt)
Version:

---

Declaration:

subroutine stars( ustar, tstar, qstar, lmonin, lmonin_dry, tgrnd, qgrnd, ts, u, v, t, q, z, z0m, z0h, z0q, cm, ch, cq, dm, km, kh, kq, dzh, itype, n)

Variables:

ustar : real*8, intent(out)

the friction speed

tstar : real*8, intent(out)

the virtual potential temperature scale

qstar : real*8, intent(out)

the moisture scale

lmonin : real*8, intent(out)

the Monin-Obukhov length scale

teeny : used from constant

itype : integer, intent(in)

n : integer, intent(in)

u : real*8, dimension(n), intent(in)

v : real*8, dimension(n), intent(in)

t : real*8, dimension(n), intent(in)

q : real*8, dimension(n), intent(in)

z : real*8, dimension(n), intent(in)

km : real*8, dimension(n-1), intent(in)

kh : real*8, dimension(n-1), intent(in)

kq : real*8, dimension(n-1), intent(in)

dzh : real*8, dimension(n-1), intent(in)

tgrnd : real*8, intent(in)

qgrnd : real*8, intent(in)

ts : real*8, intent(in)

z0m : real*8, intent(inout)

lmonin_dry : real*8, intent(out)

z0h : real*8, intent(out)

z0q : real*8, intent(out)

cm : real*8, intent(out)

ch : real*8, intent(out)

cq : real*8, intent(out)

dm : real*8, intent(out)

dz : real*8

vel1 : real*8

du1 : real*8

dv1 : real*8

dudz : real*8

dtdz : real*8

dqdz : real*8

zgs : real*8

tflx : real*8

qflx : real*8

tvflx : real*8

tgrndv : real*8

tv : real*8, dimension(2)

tstarv : real*8

dtv1 : real*8