fa_mod.F90 File Reference

Go to the source code of this file.

Data Types
type	fa_mod::facadr
type	fa_mod::fafich
type	fa_mod::fagr1tab
type	fa_mod::fa_com

Modules
module	fa_mod

Functions/Subroutines
subroutine	fa_mod::new_cadre (CA, KTYPTR, KPXLAT, KPXTRO, KPXNIV)
subroutine	fa_mod::free_cadre (CA)
subroutine	fa_mod::new_fichier (FA, FI, KPLDAT, KPXTRO, KTYPTR)
subroutine	fa_mod::free_fichier (FI)
subroutine	fa_mod::new_fa_default ()
subroutine	fa_mod::new_fa (FA, KERR, KPXTRO, KPXLAT, KPXNIV, KPNXFA, KPNXCA)
subroutine	fa_mod::free_fa (FA, KERR)
subroutine	fa_mod::cparams (KPXLAT, KPXTRO, KPXAU1, KPXLON, KPXAU2, KPXPAH, KPXIND, KPXGEO, KPXCSP, KPXPDG, KPXCHA)

Variables
integer(kind=jplikb), parameter	fa_mod::jd_yea = 1
integer(kind=jplikb), parameter	fa_mod::jd_mon = 2
integer(kind=jplikb), parameter	fa_mod::jd_day = 3
integer(kind=jplikb), parameter	fa_mod::jd_hou = 4
integer(kind=jplikb), parameter	fa_mod::jd_min = 5
integer(kind=jplikb), parameter	fa_mod::jd_tun = 6
integer(kind=jplikb), parameter	fa_mod::jd_tho = 7
integer(kind=jplikb), parameter	fa_mod::jd_gr8 = 8
integer(kind=jplikb), parameter	fa_mod::jd_ian = 9
integer(kind=jplikb), parameter	fa_mod::jd_cu1 = 10
integer(kind=jplikb), parameter	fa_mod::jd_cu2 = 11
integer(kind=jplikb), parameter	fa_mod::jd_dex = 12
integer(kind=jplikb), parameter	fa_mod::jd_sem = 14
integer(kind=jplikb), parameter	fa_mod::jd_set = 15
integer(kind=jplikb), parameter	fa_mod::jd_ce1 = 16
integer(kind=jplikb), parameter	fa_mod::jd_ce2 = 17
integer(kind=jplikb), parameter	fa_mod::jd_tst = 18
integer(kind=jplikb), parameter	fa_mod::jd_fmt = 19
integer(kind=jplikb), parameter	fa_mod::jd_siz = 22
integer(kind=jplikb), parameter	fa_mod::jpprcm = JPDBLD / JPDBLR
integer(kind=jplikb), parameter	fa_mod::jngeom = 18_JPLIKB
integer(kind=jplikb), parameter	fa_mod::jnexpl = 8_JPLIKB
integer(kind=jplikb), parameter	fa_mod::jpniil =-999_JPLIKB
integer(kind=jplikb), parameter	fa_mod::jpxnom = 16_JPLIKB
integer(kind=jplikb), parameter	fa_mod::jpxprf = 8_JPLIKB
integer(kind=jplikb), parameter	fa_mod::jpxsuf = JPXNOM+JPXPRF
integer(kind=jplikb), parameter	fa_mod::nundef = JPNIIL
real(kind=jpdblr), parameter	fa_mod::xundef = -99._JPDBLD
logical, parameter	fa_mod::lundef = .FALSE.
character, parameter	fa_mod::cundef = CHAR (0)
integer, save	fa_mod::ngrib2_glo_sh = NUNDEF
integer, save	fa_mod::ngrib2_glo_gp = NUNDEF
integer, save	fa_mod::ngrib2_lam_gp = NUNDEF
integer, save	fa_mod::ngrib2_lam_bf = NUNDEF
integer, save	fa_mod::ngrib1_latlon = NUNDEF
integer, save	fa_mod::ngrib2_latlon = NUNDEF
logical, save	fa_mod::lgrib2_lam_ex = .FALSE.
logical, save	fa_mod::lgrib2_lam_bf = .FALSE.
logical, save	fa_mod::lgrib2_init = .FALSE.
type(fa_com), target, save	fa_mod::fa_com_default
logical, save	fa_mod::fa_com_default_init = .FALSE.