slab_heat_transp_mod Module

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!


Uses

  • module~~slab_heat_transp_mod~2~~UsesGraph module~slab_heat_transp_mod~2 slab_heat_transp_mod module~mod_grid_phy_lmdz mod_grid_phy_lmdz module~slab_heat_transp_mod~2->module~mod_grid_phy_lmdz

Contents


Variables

Type Visibility Attributes Name Initial
real, public, SAVE, ALLOCATABLE :: fext(:)
real, public, SAVE, ALLOCATABLE :: beta(:)
real, public, SAVE, ALLOCATABLE :: unsairez(:)
real, public, SAVE, ALLOCATABLE :: unsaire(:)
real, public, SAVE, ALLOCATABLE :: cu(:)
real, public, SAVE, ALLOCATABLE :: cv(:)
real, public, SAVE, ALLOCATABLE :: cuvsurcv(:)
real, public, SAVE, ALLOCATABLE :: cvusurcu(:)
real, public, SAVE, ALLOCATABLE :: aire(:)
real, public, SAVE :: apoln
real, public, SAVE :: apols
real, public, SAVE, ALLOCATABLE :: aireu(:)
real, public, SAVE, ALLOCATABLE :: airev(:)
logical, public, SAVE :: alpha_var
logical, public, SAVE :: slab_upstream
logical, public, SAVE :: slab_sverdrup
logical, public, SAVE :: slab_tyeq
logical, public, SAVE :: ekman_zonadv
logical, public, SAVE :: ekman_zonavg
real, public, SAVE :: alpham
real, public, SAVE :: gmkappa
real, public, SAVE :: gm_smax
real, public, SAVE, ALLOCATABLE :: zmasqu(:)
real, public, SAVE, ALLOCATABLE :: zmasqv(:)
real, public, SAVE, ALLOCATABLE :: unsfv(:)
real, public, SAVE, ALLOCATABLE :: unsbv(:)
real, public, SAVE, ALLOCATABLE :: unsev(:)
real, public, SAVE, ALLOCATABLE :: unsfu(:)
real, public, SAVE, ALLOCATABLE :: unseu(:)

Subroutines

public subroutine ini_slab_transp_geom(ip1jm, ip1jmp1, unsairez_, fext_, unsaire_, cu_, cuvsurcv_, cv_, cvusurcu_, aire_, apoln_, apols_, aireu_, airev_, rlatv, rad, omeg)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ip1jm
integer, intent(in) :: ip1jmp1
real, intent(in) :: unsairez_(ip1jm)
real, intent(in) :: fext_(ip1jm)
real, intent(in) :: unsaire_(ip1jmp1)
real, intent(in) :: cu_(ip1jmp1)
real, intent(in) :: cuvsurcv_(ip1jm)
real, intent(in) :: cv_(ip1jm)
real, intent(in) :: cvusurcu_(ip1jmp1)
real, intent(in) :: aire_(ip1jmp1)
real, intent(in) :: apoln_
real, intent(in) :: apols_
real, intent(in) :: aireu_(ip1jmp1)
real, intent(in) :: airev_(ip1jm)
real, intent(in) :: rlatv(nbp_lat-1)
real, intent(in) :: rad
real, intent(in) :: omeg

public subroutine ini_slab_transp(zmasq)

Arguments

Type IntentOptional Attributes Name
real :: zmasq(klon_glo)

public subroutine divgrad_phy(nlevs, temp, delta)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: nlevs
real, intent(in) :: temp(klon_glo,nlevs)
real, intent(out) :: delta(klon_glo,nlevs)

public subroutine slab_ekman1(tx_phy, ty_phy, ts_phy, dt_phy)

Arguments

Type IntentOptional Attributes Name
real :: tx_phy(klon_glo)
real :: ty_phy(klon_glo)
real :: ts_phy(klon_glo)
real :: dt_phy(klon_glo)

public subroutine slab_ekman2(tx_phy, ty_phy, ts_phy, dt_phy_ek, dt_phy_gm, slab_gm)

Arguments

Type IntentOptional Attributes Name
real :: tx_phy(klon_glo)
real :: ty_phy(klon_glo)
real :: ts_phy(klon_glo,2)
real :: dt_phy_ek(klon_glo,2)
real :: dt_phy_gm(klon_glo,2)
logical, intent(in) :: slab_gm

public subroutine slab_gmdiff(ts_phy, dt_phy)

Arguments

Type IntentOptional Attributes Name
real :: ts_phy(klon_glo,2)
real :: dt_phy(klon_glo,2)