Go to the source code of this file.
Functions/Subroutines | |
subroutine | ecumev6_flux (PZ0SEA, PTA, PEXNA, PRHOA, PSST, PSSS, PEXNS, PQA, PVMOD, PZREF, PUREF, PPS, PPA, PICHCE, OPRECIP, OPWEBB, PQSAT, PSFTH, PSFTQ, PUSTAR, PCD, PCDN, PCH, PCE, PRI, PRESA, PRAIN, KZ0, PZ0HSEA, OPERTFLUX, PPERTFLUX) |
subroutine ecumev6_flux | ( | real, dimension(:), intent(inout) | PZ0SEA, |
real, dimension(:), intent(in) | PTA, | ||
real, dimension(:), intent(in) | PEXNA, | ||
real, dimension(:), intent(in) | PRHOA, | ||
real, dimension(:), intent(inout) | PSST, | ||
real, dimension(:), intent(in) | PSSS, | ||
real, dimension(:), intent(in) | PEXNS, | ||
real, dimension(:), intent(in) | PQA, | ||
real, dimension(:), intent(in) | PVMOD, | ||
real, dimension(:), intent(in) | PZREF, | ||
real, dimension(:), intent(in) | PUREF, | ||
real, dimension(:), intent(in) | PPS, | ||
real, dimension(:), intent(in) | PPA, | ||
real, intent(in) | PICHCE, | ||
logical, intent(in) | OPRECIP, | ||
logical, intent(in) | OPWEBB, | ||
real, dimension(:), intent(out) | PQSAT, | ||
real, dimension(:), intent(out) | PSFTH, | ||
real, dimension(:), intent(out) | PSFTQ, | ||
real, dimension(:), intent(out) | PUSTAR, | ||
real, dimension(:), intent(out) | PCD, | ||
real, dimension(:), intent(out) | PCDN, | ||
real, dimension(:), intent(out) | PCH, | ||
real, dimension(:), intent(out) | PCE, | ||
real, dimension(:), intent(out) | PRI, | ||
real, dimension(:), intent(out) | PRESA, | ||
real, dimension(:), intent(in) | PRAIN, | ||
integer, intent(in) | KZ0, | ||
real, dimension(:), intent(out) | PZ0HSEA, | ||
logical, intent(in) | OPERTFLUX, | ||
real, dimension(:), intent(in) | PPERTFLUX | ||
) |
>0 as ZTAU<<0 & ZTAUR<=0
>0
Definition at line 6 of file ecumev6_flux.F90.