#!/usr/bin/env python
#
# Copyright 2015 ECMWF.
#
# This software is licensed under the terms of the Apache Licence Version 2.0
# which can be obtained at http://www.apache.org/licenses/LICENSE-2.0
#
# In applying this licence, ECMWF does not waive the privileges and immunities granted to it by
# virtue of its status as an intergovernmental organisation nor does it submit to any jurisdiction.
#
# **************************************************************************
# Function : compute_geopotential_on_ml
#
# Author (date) : Cristian Simarro (09/10/2015)
#
# Category : COMPUTATION
#
# OneLineDesc : Computes geopotential on model levels
#
# Description : Computes geopotential on model levels.
# Based on code from Nils Wedi, the IFS documentation:
# https://software.ecmwf.int/wiki/display/IFS/CY41R1+Official+IFS+Documentation
# part III. Dynamics and numerical procedures
# optimised implementation by Dominique Lucas.
# ported to Python by Cristian Simarro
#
# Parameters : tq.grib - grib file with all the levelist of t and q
# zlnsp.grib - grib file with levelist 1 for params z and lnsp
# -o output (optional) - name of the output file (default='z_out.grib')
#
# Return Value : output (default='z_out.grib')
# A fieldset of geopotential on model levels
#
# Dependencies : None
#
# Example Usage :
# python compute_geopotential_on_ml.py tq.grib zlnsp.grib
from numpy import *
import sys,math,os
import argparse
from gribapi import *
def main(t_q,z_lnsp,u_v,out_name,h):
#some checks and information printing
print "Using as input files:\n ",t_q,z_lnsp,u_v
print "The result will be stored in:\n ",out_name
if os.path.exists(out_name):
os.remove(out_name)
fout = open(out_name,'w')
ftmp = open(t_q)
ftmp.close()
Rd = 287.06
RG = 9.80665
index_keys = ["date","time","shortName","level","step"]
values= {}
pv = {}
out = {}
gid_out = {}
values_plev = {}
values_lev = {}
h=int(h)
zlnsp = grib_index_new_from_file(z_lnsp,index_keys)
iidtq = grib_index_new_from_file(t_q,index_keys)
iiduv = grib_index_new_from_file(u_v,index_keys)
#we need to get z and lnsp from the first level to do the calculations
counter=0
for date in grib_index_get(zlnsp,'date'):
grib_index_select(zlnsp,'date',date)
grib_index_select(iidtq,'date',date)
grib_index_select(iiduv,'date',date)
for time in grib_index_get(zlnsp,'time'):
grib_index_select(zlnsp,'time',time)
grib_index_select(iidtq,'time',time)
grib_index_select(iiduv,'time',time)
grib_index_select(zlnsp,'level',1)
grib_index_select(zlnsp,'step',0)
grib_index_select(zlnsp,'shortName','z')
gid = grib_new_from_index(zlnsp)
#gridType must be gridded, not spectral
if grib_get(gid,"gridType",str) == "sh":
print(sys.argv[0]+' [ERROR] fields must be gridded, not spectral')
sys.exit(1)
# surface geopotential
values["z"] = grib_get_values(gid)
z_h = values["z"]
pv = grib_get_array(gid,'pv')
levelSizeNV = grib_get(gid,'NV',int)/2 -1
grib_release(gid)
for step in grib_index_get(iidtq,'step'):
z_h = values["z"]
# heigh in geopotential
my_z = h*RG + z_h
z_f_prev = z_h
grib_index_select(iidtq,'step',step)
grib_index_select(iiduv,'step',step)
for shortName in ["lnsp"]:
grib_index_select(zlnsp,'shortName',shortName)
grib_index_select(zlnsp,'step',step)
gid = grib_new_from_index(zlnsp)
if grib_get(gid,"gridType",str) == "sh":
print(sys.argv[0]+' [ERROR] fields must be gridded, not spectral')
sys.exit(1)
values[shortName] = grib_get_values(gid)
pv = grib_get_array(gid,'pv')
levelSizeNV = grib_get(gid,'NV',int)/2 -1
grib_release(gid)
# surface pressure
sp = exp(values["lnsp"])
# get the coefficients for computing the pressures
# how many levels are we computing?
grib_index_select(iidtq,'shortName',"t")
levelSize=max(grib_index_get(iidtq,"level",int))
if levelSize != levelSizeNV:
print(sys.argv[0]+' [WARN] total levels should be: '+str(levelSizeNV)+' but it is '+str(levelSize))
A = pv[0:levelSize+1]
B = pv[levelSize+1:]
Ph_levplusone = A[levelSize] + (B[levelSize]*sp)
# We want to integrate up into the atmosphere, starting at the ground
# so we start at the lowest level (highest number) and keep
# accumulating the height as we go.
# See the IFS documentation:
# https://software.ecmwf.int/wiki/display/IFS/CY41R1+Official+IFS+Documentation
# part III
# For speed and file I/O, we perform the computations with numpy vectors instead
# of fieldsets.
#initialize values for the output
for param in ["u","v"]:
grib_index_select(iiduv,'level',1)
grib_index_select(iiduv,'shortName',param)
gid = grib_new_from_index(iiduv)
gid_out[param]=grib_clone(gid)
grib_release(gid)
out[param]=zeros(sp.size)
found = [False for i in range(sp.size)]
for lev in list(reversed(range(1,levelSize+1))):
# select the levelist and retrieve the vaules of t and q
# t_level: values for t
# q_level: values for q
grib_index_select(iidtq,'level',lev)
grib_index_select(iidtq,'shortName',"t")
gid = grib_new_from_index(iidtq)
t_level = grib_get_values(gid)
grib_release(gid)
grib_index_select(iidtq,'shortName',"q")
gid = grib_new_from_index(iidtq)
q_level = grib_get_values(gid)
grib_release(gid)
# compute moist temperature
t_level = t_level * (1.+0.609133*q_level)
# compute the pressures (on half-levels)
Ph_lev = A[lev-1] + (B[lev-1] * sp)
if lev == 1:
dlogP = log(Ph_levplusone/0.1)
alpha = log(2)
else:
dlogP = log(Ph_levplusone/Ph_lev)
dP = Ph_levplusone-Ph_lev
alpha = 1. - ((Ph_lev/dP)*dlogP)
TRd = t_level*Rd
# z_f is the geopotential of this full level
# integrate from previous (lower) half-level z_h to the full level
z_f = z_h + (TRd*alpha)
# z_h is the geopotential of 'half-levels'
# integrate z_h to next half level
z_h=z_h+(TRd*dlogP)
Ph_levplusone = Ph_lev
# store the result (z_f) in a field and add to the output fieldset
# (add it to the front, not the end, because we are going 'backwards'
# through the fields)
for param in ["u","v"]:
grib_index_select(iiduv,'level',lev) #136
grib_index_select(iiduv,'shortName',param)
gidp=grib_new_from_index(iiduv)
values_lev[param] = grib_get_values(gidp)
grib_release(gidp)
if (lev < levelSize):
grib_index_select(iiduv,'level',lev+1) #137
gidp=grib_new_from_index(iiduv)
values_plev[param] = grib_get_values(gidp)
grib_release(gidp)
else:
values_plev[param] = zeros(sp.size)
for i in arange(z_f_prev.size):
if found[i]: continue
if my_z[i] >= z_f_prev[i] and my_z[i] < z_f[i]:
found[i]=True
#print "wind %d for point %d found between ml %d(%lf) and %d(%lf)\n" %(my_z[i],i,lev+1,z_f_prev[i],lev,z_f[i])
for param in ["u","v"]:
out[param][i] = ((values_lev[param][i] * ( my_z[i]-z_f_prev[i])) + (values_plev[param][i] * (z_f[i] - my_z[i]) )) / (z_f[i] - z_f_prev[i])
z_f_prev=z_f
for i in arange(sp.size):
if not found[i]:
print "point ",i,"not found..."
for param in ["u","v"]:
grib_set_values(gid_out[param],out[param])
grib_write(gid_out[param],fout)
grib_release(gid_out[param])
grib_index_release(iidtq)
grib_index_release(iiduv)
grib_index_release(zlnsp)
fout.close()
print("Done")
if __name__ == "__main__":
request_date=0
request_time=0
wind = 100
parser = argparse.ArgumentParser(
description='Python tool to calculate the Z of the model levels')
parser.add_argument("-w","--wind", help="height to calculate the wind components",required=True)
parser.add_argument("-o","--output", help="name of the output file")
parser.add_argument('t_q', metavar='tq.grib', type=str,
help='grib file with temperature(t) and humidity(q) for the model levels')
parser.add_argument('z_lnsp', metavar='zlnsp.grib', type=str,
help='grib file with geopotential(z) and Logarithm of surface pressure(lnsp) for the ml=1')
parser.add_argument('u_v', metavar='uv.grib', type=str,
help='grib file with u and v component of wind for the model levels')
args = parser.parse_args()
for fname in (args.t_q,args.z_lnsp,args.u_v):
if not os.path.isfile(fname):
print "[ERROR] file %s does not exist" %(fname)
sys.exit(1)
if args.wind:
wind = args.wind
out_name = 'uv_out_'+wind+'m.grib'
if args.output:
out_name=args.output
#calling main function
main(args.t_q,args.z_lnsp,args.u_v,out_name,wind)
Overview
Content Tools