subroutine get_spectra_tau_nstgw | ( | integer | nw, |
integer | im, | ||
integer | levs, | ||
real, dimension(im, levs) | trig_fgf, | ||
real, dimension(im) | xlatd, | ||
real, dimension(im) | sinlat, | ||
real, dimension(im) | coslat, | ||
real, dimension(im) | taub, | ||
integer, dimension(im) | klev, | ||
integer, dimension(im) | if_src, | ||
integer | nf_src | ||
) |
References slat_geos5().
Referenced by cires_ugwp_module::cires_ugwp_driver().