
Function for computing the geopotential height using the hydrostatic equation.
function hydro(
p : float,
tkv : float,
zsfc : float
)
No missing values are allowed.
begin
p =(/ 1008.,1000.,950.,900.,850.,800.,750.,700.,650.,600., \
550.,500.,450.,400.,350.,300.,250.,200., \
175.,150.,125.,100., 80., 70., 60., 50., \
40., 30., 25., 20. /)
t =(/ 29.3,28.1,23.5,20.9,18.4,15.9,13.1,10.1, 6.7, 3.1, \
-0.5,-4.5,-9.0,-14.8,-21.5,-29.7,-40.0,-52.4, \
-59.2,-66.5,-74.1,-78.5,-76.0,-71.6,-66.7,-61.3, \
-56.3,-51.7,-50.7,-47.5 /)
q =(/ 20.38,19.03,16.14,13.71,11.56,9.80,8.33,6.75,6.06,5.07, \
3.88, 3.29, 2.39, 1.70,1.00,0.60,0.20,0.00,0.00, \
0.00, 0.00, 0.00, 0.00,0.00,0.00,0.00,0.00,0.00, \
0.00, 0.00 /)
zsfc = 17.0
q = q*0.001
tkv = (t+273.15)*(1.+q*0.61)
zh = hydro (p,tkv,zsfc)
end
NG4.1 Home, Index, Examples, Glossary, Feedback, Ref Contents, Ref WhereAmI?