climb_hq_down Subroutine

public subroutine climb_hq_down(knon, coefhq, paprs, pplay, delp, temp, q, dtime, Ccoef_H_out, Ccoef_Q_out, Dcoef_H_out, Dcoef_Q_out, Kcoef_hq_out, gama_q_out, gama_h_out, Acoef_H_out, Acoef_Q_out, Bcoef_H_out, Bcoef_Q_out)

Uses

  • proc~~climb_hq_down~2~~UsesGraph proc~climb_hq_down~2 climb_hq_down module~yomcst_mod_h yomcst_mod_h proc~climb_hq_down~2->module~yomcst_mod_h module~compbl_mod_h compbl_mod_h proc~climb_hq_down~2->module~compbl_mod_h

! nrlmd le 02/05/2011 !

2) Definition of the coeficient K

3) Calculation of gama for "Q" and "H"

surface pressure is used as reference

4) Calculte the coefficients C and D for specific humidity, q

5) Calculte the coefficients C and D for potentiel entalpie, H

6) Return the first layer in output variables

7) If Pbl is split, return also the other layers in output variables

! jyg le 07/02/2012 jyg IF (mod(iflag_pbl_split,2) .eq.1) THEN ! nrlmd le 02/05/2011 !
!

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: knon
real, intent(in), DIMENSION(klon,klev) :: coefhq
real, intent(in), DIMENSION(klon,klev+1) :: paprs
real, intent(in), DIMENSION(klon,klev) :: pplay
real, intent(in), DIMENSION(klon,klev) :: delp
real, intent(in), DIMENSION(klon,klev) :: temp
real, intent(in), DIMENSION(klon,klev) :: q
real, intent(in) :: dtime
real, intent(out), DIMENSION(klon,klev) :: Ccoef_H_out
real, intent(out), DIMENSION(klon,klev) :: Ccoef_Q_out
real, intent(out), DIMENSION(klon,klev) :: Dcoef_H_out
real, intent(out), DIMENSION(klon,klev) :: Dcoef_Q_out
real, intent(out), DIMENSION(klon,klev) :: Kcoef_hq_out
real, intent(out), DIMENSION(klon,klev) :: gama_q_out
real, intent(out), DIMENSION(klon,klev) :: gama_h_out

!
real, intent(out), DIMENSION(klon) :: Acoef_H_out
real, intent(out), DIMENSION(klon) :: Acoef_Q_out
real, intent(out), DIMENSION(klon) :: Bcoef_H_out
real, intent(out), DIMENSION(klon) :: Bcoef_Q_out

! nrlmd le 02/05/2011

Contents