LWU Subroutine

subroutine LWU(KIDIA, KFDIA, KLON, KLEV, PAER, PCCO2, PDP, PPMB, PQOF, PTAVE, PVIEW, PWV, PABCU)

Uses

  • proc~~lwu~2~~UsesGraph proc~lwu~2 LWU module~infotrac_phy~2 infotrac_phy proc~lwu~2->module~infotrac_phy~2 module~yomhook yomhook proc~lwu~2->module~yomhook module~yoerdu YOERDU proc~lwu~2->module~yoerdu module~parkind1~2 PARKIND1 proc~lwu~2->module~parkind1~2 module~yoelw YOELW proc~lwu~2->module~yoelw module~yomcst~3 YOMCST proc~lwu~2->module~yomcst~3 module~lmdz_reprobus_wrappers lmdz_reprobus_wrappers proc~lwu~2->module~lmdz_reprobus_wrappers module~yoesw YOESW proc~lwu~2->module~yoesw module~lmdz_cppkeys_wrapper lmdz_cppkeys_wrapper proc~lwu~2->module~lmdz_cppkeys_wrapper module~clesphys_mod_h~2 clesphys_mod_h proc~lwu~2->module~clesphys_mod_h~2 module~strings_mod strings_mod module~infotrac_phy~2->module~strings_mod module~readtracfiles_mod readTracFiles_mod module~infotrac_phy~2->module~readtracfiles_mod module~yoerdu->module~parkind1~2 module~yoelw->module~parkind1~2 module~yomcst~3->module~parkind1~2 module~mod_grid_phy_lmdz mod_grid_phy_lmdz module~lmdz_reprobus_wrappers->module~mod_grid_phy_lmdz module~yoesw->module~parkind1~2 netcdf netcdf module~lmdz_cppkeys_wrapper->netcdf iso_fortran_env iso_fortran_env module~lmdz_cppkeys_wrapper->iso_fortran_env module~strings_mod->iso_fortran_env module~readtracfiles_mod->module~strings_mod module~ioipsl_getin_p_mod ioipsl_getin_p_mod module~readtracfiles_mod->module~ioipsl_getin_p_mod module~ioipsl_getin_p_mod->module~strings_mod module~mod_phys_lmdz_transfert_para mod_phys_lmdz_transfert_para module~ioipsl_getin_p_mod->module~mod_phys_lmdz_transfert_para module~mod_phys_lmdz_para mod_phys_lmdz_para module~ioipsl_getin_p_mod->module~mod_phys_lmdz_para ioipsl ioipsl module~ioipsl_getin_p_mod->ioipsl module~mod_phys_lmdz_omp_transfert mod_phys_lmdz_omp_transfert module~mod_phys_lmdz_transfert_para->module~mod_phys_lmdz_omp_transfert module~mod_phys_lmdz_mpi_transfert mod_phys_lmdz_mpi_transfert module~mod_phys_lmdz_transfert_para->module~mod_phys_lmdz_mpi_transfert module~mod_phys_lmdz_para->module~mod_phys_lmdz_transfert_para module~mod_phys_lmdz_omp_data mod_phys_lmdz_omp_data module~mod_phys_lmdz_para->module~mod_phys_lmdz_omp_data module~mod_phys_lmdz_mpi_data mod_phys_lmdz_mpi_data module~mod_phys_lmdz_para->module~mod_phys_lmdz_mpi_data module~mod_phys_lmdz_mpi_data->module~lmdz_cppkeys_wrapper module~lmdz_mpi lmdz_mpi module~mod_phys_lmdz_mpi_data->module~lmdz_mpi

*** LWU - LONGWAVE EFFECTIVE ABSORBER AMOUNTS

  • INTERFACE. ----------
     4.    PRESSURE THICKNESS AND MEAN PRESSURE OF SUB-LAYERS
        --------------------------------------------------

 5.    CUMULATIVE ABSORBER AMOUNTS FROM TOP OF ATMOSPHERE
        --------------------------------------------------

 5.1  CUMULATIVE AEROSOL AMOUNTS FROM TOP OF ATMOSPHERE
       --------------------------------------------------

    -- NB: 'PAER' AEROSOLS ARE ENTERED FROM TOP TO BOTTOM

     5.2  INTRODUCES TEMPERATURE EFFECTS ON ABSORBER AMOUNTS
       --------------------------------------------------

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in) :: KIDIA
integer(kind=JPIM), intent(in) :: KFDIA
integer(kind=JPIM), intent(in) :: KLON
integer(kind=JPIM), intent(in) :: KLEV
real(kind=JPRB), intent(in) :: PAER(KLON,6,KLEV)
real(kind=JPRB), intent(in) :: PCCO2
real(kind=JPRB), intent(in) :: PDP(KLON,KLEV)
real(kind=JPRB), intent(in) :: PPMB(KLON,KLEV+1)
real(kind=JPRB), intent(in) :: PQOF(KLON,KLEV)
real(kind=JPRB), intent(in) :: PTAVE(KLON,KLEV)
real(kind=JPRB), intent(in) :: PVIEW(KLON)
real(kind=JPRB), intent(in) :: PWV(KLON,KLEV)
real(kind=JPRB), intent(out) :: PABCU(KLON,NUA,3*KLEV+1)

include "clesphys.h"

   0.1   ARGUMENTS
          ---------

Calls

proc~~lwu~2~~CallsGraph proc~lwu~2 LWU proc~dr_hook dr_hook proc~lwu~2->proc~dr_hook

Contents