LMDZ
recmwf_aero.F90 File Reference
#include "radlsw.intfb.h"
Include dependency graph for recmwf_aero.F90:

Go to the source code of this file.

Functions/Subroutines

subroutine recmwf_aero (KST, KEND, KPROMA, KTDIA, KLEV, KMODE, PALBD, PALBP, PAPRS, PAPRSF, PCCO2, PCLFR, PQO3, PAER, PDP, PEMIS, PMU0, PQ, PQS, PQIWP, PQLWP, PSLM, PT, PTS, PREF_LIQ, PREF_ICE,
 

Function/Subroutine Documentation

subroutine recmwf_aero ( integer(kind=jpim), intent(in)  KST,
integer(kind=jpim), intent(in)  KEND,
integer(kind=jpim), intent(in)  KPROMA,
integer(kind=jpim)  KTDIA,
integer(kind=jpim), intent(in)  KLEV,
integer(kind=jpim), intent(in)  KMODE,
real(kind=jprb), dimension(kproma,nsw), intent(in)  PALBD,
real(kind=jprb), dimension(kproma,nsw), intent(in)  PALBP,
real(kind=jprb), dimension(kproma,klev+1), intent(in)  PAPRS,
real(kind=jprb), dimension(kproma,klev), intent(in)  PAPRSF,
real(kind=jprb), intent(in)  PCCO2,
real(kind=jprb), dimension(kproma,klev), intent(in)  PCLFR,
real(kind=jprb), dimension(kproma,klev), intent(in)  PQO3,
real(kind=jprb), dimension(kproma,klev,6), intent(in)  PAER,
real(kind=jprb), dimension(kproma,klev), intent(in)  PDP,
real(kind=jprb), dimension(kproma), intent(in)  PEMIS,
real(kind=jprb), dimension(kproma), intent(in)  PMU0,
real(kind=jprb), dimension(kproma,klev), intent(in)  PQ,
real(kind=jprb), dimension(kproma,klev), intent(in)  PQS,
real(kind=jprb), dimension(kproma,klev), intent(in)  PQIWP,
real(kind=jprb), dimension(kproma,klev), intent(in)  PQLWP,
real(kind=jprb), dimension(kproma), intent(in)  PSLM,
real(kind=jprb), dimension(kproma,klev), intent(in)  PT,
real(kind=jprb), dimension(kproma), intent(in)  PTS,
real(kind=jprb), dimension(kproma,klev), intent(in)  PREF_LIQ,
real(kind=jprb), dimension(kproma,klev), intent(in)  PREF_ICE 
)

Definition at line 12 of file recmwf_aero.F90.

Here is the call graph for this function:

Here is the caller graph for this function: