Go to the source code of this file.
Functions/Subroutines | |
subroutine | bugs_rad (nlen, len, nlm, pl2, pl, dpl, tl, ql, qcwl, qcil, qril, o3l, ts, amu0, slr, alvdf, alndf, alvdr, alndr, s0, grav, cp, asl, atl, fdsw, fusw, fdlw, fulw, acld, umco2, umch4, umn2o) |
subroutine bugs_rad | ( | integer (kind=int_kind), intent(in) | nlen, |
integer (kind=int_kind), intent(in) | len, | ||
integer (kind=int_kind), intent(in) | nlm, | ||
real (kind=dbl_kind), dimension(nlen,nlm+1), intent(in) | pl2, | ||
real (kind=dbl_kind), dimension(nlen,nlm), intent(in) | pl, | ||
real (kind=dbl_kind), dimension(nlen,nlm), intent(in) | dpl, | ||
real (kind=dbl_kind), dimension(nlen,nlm), intent(in) | tl, | ||
real (kind=dbl_kind), dimension(nlen,nlm), intent(in) | ql, | ||
real (kind=dbl_kind), dimension(nlen,nlm), intent(in) | qcwl, | ||
real (kind=dbl_kind), dimension(nlen,nlm), intent(in) | qcil, | ||
real (kind=dbl_kind), dimension(nlen,nlm), intent(in) | qril, | ||
real (kind=dbl_kind), dimension(nlen,nlm), intent(in) | o3l, | ||
real (kind=dbl_kind), dimension(nlen), intent(in) | ts, | ||
real (kind=dbl_kind), dimension(nlen), intent(in) | amu0, | ||
real (kind=dbl_kind), dimension(nlen), intent(in) | slr, | ||
real (kind=dbl_kind), dimension(nlen), intent(in) | alvdf, | ||
real (kind=dbl_kind), dimension(nlen), intent(in) | alndf, | ||
real (kind=dbl_kind), dimension(nlen), intent(in) | alvdr, | ||
real (kind=dbl_kind), dimension(nlen), intent(in) | alndr, | ||
real (kind=dbl_kind), intent(in) | s0, | ||
real (kind=dbl_kind), intent(in) | grav, | ||
real (kind=dbl_kind), intent(in) | cp, | ||
real (kind=dbl_kind), dimension(nlen,nlm) | asl, | ||
real (kind=dbl_kind), dimension(nlen,nlm) | atl, | ||
real (kind=dbl_kind), dimension(len,nlm+1) | fdsw, | ||
real (kind=dbl_kind), dimension(len,nlm+1) | fusw, | ||
real (kind=dbl_kind), dimension(len,nlm+1) | fdlw, | ||
real (kind=dbl_kind), dimension(len,nlm+1) | fulw, | ||
real (kind=dbl_kind), dimension(nlen,nlm), intent(in) | acld, | ||
real (kind=dbl_kind), dimension(nlen), intent(in) | umco2, | ||
real (kind=dbl_kind), dimension(nlen), intent(in) | umch4, | ||
real (kind=dbl_kind), dimension(nlen), intent(in) | umn2o | ||
) |
Definition at line 8 of file bugs_rad.f.