ugwpv0_oro_init Module Reference

This module contains orographic wave source schemes for UGWP v0.

Functions/Subroutines
subroutine	init_oro_gws_v0 (nwaves, nazdir, nstoch, effac, lonr, kxw, cdmbgwd)

Variables
character(len=8)	strver = 'gfs_2018'
character(len=8)	strbase = 'gfs_2018'
real, parameter	rimin =-10.
real, parameter	ric =0.25
real, parameter	efmin =0.5
real, parameter	efmax =10.0
real, parameter	hpmax =2400.0
real, parameter	hpmin =25.0
real, parameter	sigma_std =1./100.
real, parameter	gamm_std =1.0
real, parameter	frmax =10.
real, parameter	frc =1.0
real, parameter	frmin =0.01
real, parameter	ce =0.8
real, parameter	ceofrc =ce/frc
real, parameter	cg =0.5
real, parameter	gmax =1.0
real, parameter	veleps =1.0
real, parameter	factop =0.5
real, parameter	rlolev =50000.0
real, parameter	hncrit =9000.
real, parameter	sigfac =4.0
real, parameter	hminmt =50.
real, parameter	minwnd =1.0
real, parameter	dpmin =5000.0
real, parameter	kxoro =6.28e-3/200.
real, parameter	coro = 0.0
integer, parameter	nridge =2
real	cdmb
real	cleff
integer	nworo
integer	nazoro
integer	nstoro
integer, parameter	mdir = 8
real, parameter	fdir =.5*mdir/pi
integer, dimension(mdir), save	nwdir
real, parameter	odmin = 0.1
real, parameter	odmax = 10.0
integer, parameter	n_tofd = 2
real, parameter	const_tofd = 0.0759
real, parameter	ze_tofd = 1500.0
real, parameter	a12_tofd = 0.0002662*0.005363
real, parameter	ztop_tofd = 10.*ze_tofd
real, parameter	fcrit_sm = 0.7
real, parameter	fcrit_sm2 = fcrit_sm * fcrit_sm
real, parameter	fcrit_gfs = 0.7
real, parameter	fcrit_mtb = 0.7
real, parameter	lzmax = 18.e3
real, parameter	mkzmin = 6.28/lzmax
real, parameter	mkz2min = mkzmin*mkzmin
real, parameter	zbr_pi = (3.0/2.0)*pi
real, parameter	zbr_ifs = 0.5*pi