SURFEX  V8_0
Surfex V8_0 release
 All Classes Files Functions Variables
Functions/Subroutines
drag_meb.F90 File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine drag_meb (LFORC_MEASURE, PTG, PTC, PTV, PSNOWTEMP, PTA, PQC, PQA, PVMOD, PWG, PWGI, PWSAT, PWFC, PEXNS, PEXNA, PPS, PRR, PSR, PRHOA, PZ0G_WITHOUT_SNOW, PZ0_MEBV, PZ0H_MEBV, PZ0EFF_MEBV, PZ0_MEBN, PZ0H_MEBN, PZ0EFF_MEBN, PZ0_WITH_SNOW, PZ0H_WITH_SNOW, PZ0EFF, PSNOWSWE, PWR, PCHIP, PTSTEP, PRS_VG, PRS_VN, PPSN, PPALPHAN, PZREF, PUREF, PH_VEG, PDIRCOSZW, PPSNCV, PDELTA, PLAI, OMEB_GNDRES, PCH, PCD, PCDN, PRI, PRA, PVELC, PCDSNOW, PCHSNOW, PRISNOW, PUSTAR2SNOW, PHUG, PHUGI, PHV, PHVG, PHVN, PHU, PQS, PRS, PLEG_DELTA, PLEGI_DELTA, PHSGL, PHSGF, PFLXC_C_A, PFLXC_N_A, PFLXC_G_C, PFLXC_N_C, PFLXC_VG_C, PFLXC_VN_C, PFLXC_MOM, PQSATG, PQSATV, PQSATC, PQSATN, PDELTAVK)
 

Function/Subroutine Documentation

subroutine drag_meb ( logical, intent(in)  LFORC_MEASURE,
real, dimension(:), intent(in)  PTG,
real, dimension(:), intent(in)  PTC,
real, dimension(:), intent(in)  PTV,
real, dimension(:), intent(in)  PSNOWTEMP,
real, dimension(:), intent(in)  PTA,
real, dimension(:), intent(in)  PQC,
real, dimension(:), intent(in)  PQA,
real, dimension(:), intent(in)  PVMOD,
real, dimension(:), intent(in)  PWG,
real, dimension(:), intent(in)  PWGI,
real, dimension(:), intent(in)  PWSAT,
real, dimension(:), intent(in)  PWFC,
real, dimension(:), intent(in)  PEXNS,
real, dimension(:), intent(in)  PEXNA,
real, dimension(:), intent(in)  PPS,
real, dimension(:), intent(in)  PRR,
real, dimension(:), intent(in)  PSR,
real, dimension(:), intent(in)  PRHOA,
real, dimension(:), intent(in)  PZ0G_WITHOUT_SNOW,
real, dimension(:), intent(in)  PZ0_MEBV,
real, dimension(:), intent(in)  PZ0H_MEBV,
real, dimension(:), intent(in)  PZ0EFF_MEBV,
real, dimension(:), intent(in)  PZ0_MEBN,
real, dimension(:), intent(in)  PZ0H_MEBN,
real, dimension(:), intent(in)  PZ0EFF_MEBN,
real, dimension(:), intent(in)  PZ0_WITH_SNOW,
real, dimension(:), intent(in)  PZ0H_WITH_SNOW,
real, dimension(:), intent(in)  PZ0EFF,
real, dimension(:), intent(in)  PSNOWSWE,
real, dimension(:), intent(in)  PWR,
real, dimension(:), intent(in)  PCHIP,
real, intent(in)  PTSTEP,
real, dimension(:), intent(in)  PRS_VG,
real, dimension(:), intent(in)  PRS_VN,
real, dimension(:), intent(in)  PPSN,
real, dimension(:), intent(in)  PPALPHAN,
real, dimension(:), intent(in)  PZREF,
real, dimension(:), intent(in)  PUREF,
real, dimension(:), intent(in)  PH_VEG,
real, dimension(:), intent(in)  PDIRCOSZW,
real, dimension(:), intent(in)  PPSNCV,
real, dimension(:), intent(in)  PDELTA,
real, dimension(:), intent(in)  PLAI,
logical, intent(in)  OMEB_GNDRES,
real, dimension(:), intent(out)  PCH,
real, dimension(:), intent(out)  PCD,
real, dimension(:), intent(out)  PCDN,
real, dimension(:), intent(out)  PRI,
real, dimension(:), intent(out)  PRA,
real, dimension(:), intent(out)  PVELC,
real, dimension(:), intent(out)  PCDSNOW,
real, dimension(:), intent(out)  PCHSNOW,
real, dimension(:), intent(out)  PRISNOW,
real, dimension(:), intent(out)  PUSTAR2SNOW,
real, dimension(:), intent(out)  PHUG,
real, dimension(:), intent(out)  PHUGI,
real, dimension(:), intent(out)  PHV,
real, dimension(:), intent(out)  PHVG,
real, dimension(:), intent(out)  PHVN,
real, dimension(:), intent(out)  PHU,
real, dimension(:), intent(out)  PQS,
real, dimension(:), intent(out)  PRS,
real, dimension(:), intent(out)  PLEG_DELTA,
real, dimension(:), intent(out)  PLEGI_DELTA,
real, dimension(:), intent(out)  PHSGL,
real, dimension(:), intent(out)  PHSGF,
real, dimension(:), intent(out)  PFLXC_C_A,
real, dimension(:), intent(out)  PFLXC_N_A,
real, dimension(:), intent(out)  PFLXC_G_C,
real, dimension(:), intent(out)  PFLXC_N_C,
real, dimension(:), intent(out)  PFLXC_VG_C,
real, dimension(:), intent(out)  PFLXC_VN_C,
real, dimension(:), intent(out)  PFLXC_MOM,
real, dimension(:), intent(out)  PQSATG,
real, dimension(:), intent(out)  PQSATV,
real, dimension(:), intent(out)  PQSATC,
real, dimension(:), intent(out)  PQSATN,
real, dimension(:), intent(out)  PDELTAVK 
)

Definition at line 7 of file drag_meb.F90.

Here is the call graph for this function:

Here is the caller graph for this function: