subroutine fvs93_ugwps	(	integer	nw,
		real, dimension (nw)	ch,
		real, dimension (nw)	dch,
		real, dimension (nw)	taub_sp,
		real	spnorm,
		integer	nslope,
		real	bn2,
		real	bn,
		real	bnrhos
	)

Referenced by ugwp_wmsdis_naz().