Go to the source code of this file.
Functions/Subroutines | |
subroutine | two_rt_lw (ncol, nlm, mbs, mbir, ib, wc, asym, tau, es, bf, fu, fd, sel_rules) |
subroutine two_rt_lw | ( | integer (kind=int_kind), intent(in) | ncol, |
integer (kind=int_kind), intent(in) | nlm, | ||
integer (kind=int_kind), intent(in) | mbs, | ||
integer (kind=int_kind), intent(in) | mbir, | ||
integer (kind=int_kind), intent(in) | ib, | ||
real (kind=dbl_kind), dimension(ncol,nlm), intent(in) | wc, | ||
real (kind=dbl_kind), dimension(ncol,nlm), intent(in) | asym, | ||
real (kind=dbl_kind), dimension(ncol,nlm), intent(in) | tau, | ||
real (kind=dbl_kind), dimension(ncol,mbir), intent(in) | es, | ||
real (kind=dbl_kind), dimension(ncol,nlm+1), intent(in) | bf, | ||
real (kind=dbl_kind), dimension(ncol,nlm+1), intent(out) | fu, | ||
real (kind=dbl_kind), dimension(ncol,nlm+1), intent(out) | fd, | ||
logical (kind=log_kind), intent(in) | sel_rules | ||
) |
Definition at line 8 of file two_rt_lw.f.