CAM
|
Functions/Subroutines | |
subroutine | qneg3 (subnam, idx, ncol, ncold, lver, lconst_beg, lconst_end, qmin, q, lfix) |
subroutine qneg3 | ( | character*(*), intent(in) | subnam, |
integer, intent(in) | idx, | ||
integer, intent(in) | ncol, | ||
integer, intent(in) | ncold, | ||
integer, intent(in) | lver, | ||
integer, intent(in) | lconst_beg, | ||
integer, intent(in) | lconst_end, | ||
real(r8), dimension(lconst_beg:lconst_end), intent(in) | qmin, | ||
real(r8), dimension(ncold,lver,lconst_beg:lconst_end), intent(inout) | q, | ||
logical, intent(in) | lfix | ||
) |