character(len=128) function mo_gas_optics_rrtmgp::compute_gas_taus |
( |
class(ty_gas_optics_rrtmgp), intent(in) | this, |
|
|
integer, intent(in) | ncol, |
|
|
integer, intent(in) | nlay, |
|
|
integer, intent(in) | ngpt, |
|
|
integer, intent(in) | nband, |
|
|
real(wp), dimension(:,:), intent(in) | play, |
|
|
real(wp), dimension(:,:), intent(in) | plev, |
|
|
real(wp), dimension(:,:), intent(in) | tlay, |
|
|
type(ty_gas_concs), intent(in) | gas_desc, |
|
|
class(ty_optical_props_arry), intent(inout) | optical_props, |
|
|
integer, dimension( ncol, nlay), intent(out) | jtemp, |
|
|
integer, dimension( ncol, nlay), intent(out) | jpress, |
|
|
integer, dimension(2, ncol, nlay,get_nflav(this)), intent(out) | jeta, |
|
|
logical(wl), dimension( ncol, nlay), intent(out) | tropo, |
|
|
real(wp), dimension(2,2,2,ncol, nlay,get_nflav(this)), intent(out) | fmajor, |
|
|
real(wp), dimension(:,:), intent(in), optional, target | col_dry ) |
|
private |