Index | Rundeck: P1SoM40 | Created: Thu May 9 03:30:17 EDT 2024 |
output | Module: SOCPBL | File: PBL.f |
Author : Ye Cheng/G. Hartke
Version:
Declaration:
subroutine output(u, v, t, q, e, lscale, z, zhat, dzh, km, kh, kq, ke, gm, gh, cm, ch, cq, z0m, z0h, z0q, ustar, tstar, qstar, lmonin, tgrnd, qgrnd, utop, vtop, ttop, qtop, dtime, bgrid, ilong, jlat, iter, itype, n)
- simil
- Module: SOCPBL File: PBL.f
simil calculates the similarity solutions for wind speed, virtual potential temperature, and moisture mixing ratio at height z.
- degree :
real*8, parameter
- Initial Value
= 1./radian
- n :
integer, intent(in)
- itype :
integer, intent(in)
- iter :
integer, intent(in)
- jlat :
integer, intent(in)
- ilong :
integer, intent(in)
- lscale :
real*8, intent(in), dimension(n-1)
- lmonin :
real*8, 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)
- e :
real*8, dimension(n-1), intent(in)
- zhat :
real*8, dimension(n-1), intent(in)
- dzh :
real*8, dimension(n-1), 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)
- ke :
real*8, dimension(n-1), intent(in)
- gm :
real*8, dimension(n-1), intent(in)
- gh :
real*8, dimension(n-1), intent(in)
- i :
integer
- loop variable
- cm :
real*8, intent(in)
- ch :
real*8, intent(in)
- cq :
real*8, intent(in)
- z0m :
real*8, intent(in)
- z0h :
real*8, intent(in)
- z0q :
real*8, intent(in)
- ustar :
real*8, intent(in)
- tstar :
real*8, intent(in)
- qstar :
real*8, intent(in)
- tgrnd :
real*8, intent(in)
- qgrnd :
real*8, intent(in)
- utop :
real*8, intent(in)
- vtop :
real*8, intent(in)
- ttop :
real*8, intent(in)
- qtop :
real*8, intent(in)
- dtime :
real*8, intent(in)
- bgrid :
real*8, intent(in)
- psitop :
real*8
- psi :
real*8
- utotal :
real*8
- utot1 :
real*8
- utot2 :
real*8
- sign :
real*8
- shear :
real*8
- tgrad :
real*8
- qgrad :
real*8
- uflux :
real*8
- hflux :
real*8
- qflux :
real*8
- bvfrq2 :
real*8
- shear2 :
real*8
- rich :
real*8
- dqdz :
real*8
- dtdz :
real*8
- dudz :
real*8
- phim :
real*8
- phih :
real*8
- dudzs :
real*8
- dtdzs :
real*8
- dqdzs :
real*8
- uratio :
real*8
- tratio :
real*8
- qratio :
real*8
- dbydzh :
real*8
- tgradl :
real*8
- prod :
real*8
- utest :
real*8
- ttest :
real*8
- qtest :
real*8
- dpsim :
real*8
- dpsih :
real*8
- dpsiq :
real*8
- zet :
real*8