subroutine mo_gas_optics_kernels::gas_optical_depths_major |
( |
integer, intent(in) | ncol, |
|
|
integer, intent(in) | nlay, |
|
|
integer, intent(in) | nbnd, |
|
|
integer, intent(in) | ngpt, |
|
|
integer, intent(in) | nflav, |
|
|
integer, intent(in) | neta, |
|
|
integer, intent(in) | npres, |
|
|
integer, intent(in) | ntemp, |
|
|
integer, dimension(2,ngpt), intent(in) | gpoint_flavor, |
|
|
integer, dimension(2,nbnd), intent(in) | band_lims_gpt, |
|
|
real(wp), dimension(ntemp,neta,npres+1,ngpt), intent(in) | kmajor, |
|
|
real(wp), dimension(2, ncol,nlay,nflav), intent(in) | col_mix, |
|
|
real(wp), dimension(2,2,2,ncol,nlay,nflav), intent(in) | fmajor, |
|
|
integer, dimension(2, ncol,nlay,nflav), intent(in) | jeta, |
|
|
logical(wl), dimension(ncol,nlay), intent(in) | tropo, |
|
|
integer, dimension(ncol,nlay), intent(in) | jtemp, |
|
|
integer, dimension(ncol,nlay), intent(in) | jpress, |
|
|
real(wp), dimension(ncol,nlay,ngpt), intent(inout) | tau ) |
|
private |