subroutine cu_gf_deep::neg_check | ( | character *(*), intent(in) | name, |
integer, intent(in) | j, | ||
real(kind=kind_phys), intent(in) | dt, | ||
real(kind=kind_phys), dimension (its:ite,kts:kte ), intent(inout) | q, | ||
real(kind=kind_phys), dimension (its:ite,kts:kte ), intent(inout) | outq, | ||
real(kind=kind_phys), dimension (its:ite,kts:kte ), intent(inout) | outt, | ||
real(kind=kind_phys), dimension (its:ite,kts:kte ), intent(inout) | outu, | ||
real(kind=kind_phys), dimension (its:ite,kts:kte ), intent(inout) | outv, | ||
real(kind=kind_phys), dimension (its:ite,kts:kte ), intent(inout) | outqc, | ||
real(kind=kind_phys), dimension (its:ite ), intent(inout) | pret, | ||
integer, intent(in) | its, | ||
integer, intent(in) | ite, | ||
integer, intent(in) | kts, | ||
integer, intent(in) | kte, | ||
integer, intent(in) | itf, | ||
integer, intent(in) | ktf, | ||
integer, dimension (its:ite ), intent(in) | ktop ) |
Definition at line 3939 of file cu_gf_deep.F90.
Referenced by cu_gf_driver::cu_gf_driver_run().