ini_COSP Subroutine

subroutine ini_COSP(ref_liq_cosp0, ref_ice_cosp0, pctsrf_cosp0, zu10m_cosp0, zv10m_cosp0, zxtsol_cosp0, zx_rh_cosp0, cldfra_cosp0, rnebcon_cosp0, flwc_cosp0, fiwc_cosp0, prfl_cosp0, psfl_cosp0, pmflxr_cosp0, pmflxs_cosp0, mr_ozone_cosp0, cldtau_cosp0, cldemi_cosp0, JrNt_cosp0)

Uses

  • proc~~ini_cosp~2~~UsesGraph proc~ini_cosp~2 ini_COSP module~dimphy~3 dimphy proc~ini_cosp~2->module~dimphy~3

Arguments

Type IntentOptional Attributes Name
real :: ref_liq_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: ref_ice_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: pctsrf_cosp0(klon)

$OMP THREADPRIVATE(/iniCOSP/)
real :: zu10m_cosp0(klon)

$OMP THREADPRIVATE(/iniCOSP/)
real :: zv10m_cosp0(klon)

$OMP THREADPRIVATE(/iniCOSP/)
real :: zxtsol_cosp0(klon)

$OMP THREADPRIVATE(/iniCOSP/)
real :: zx_rh_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: cldfra_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: rnebcon_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: flwc_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: fiwc_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: prfl_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: psfl_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: pmflxr_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: pmflxs_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: mr_ozone_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: cldtau_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: cldemi_cosp0(klon,klev)

$OMP THREADPRIVATE(/iniCOSP/)
real :: JrNt_cosp0(klon)

$OMP THREADPRIVATE(/iniCOSP/)

Contents