Data Types
type	fa_com

type	facadr

type	fafich

type	fagr1tab

Functions/Subroutines
subroutine	new_cadre (CA, KTYPTR, KPXLAT, KPXTRO, KPXNIV)

subroutine	free_cadre (CA)

subroutine	new_fichier (FA, FI, KPLDAT, KPXTRO, KTYPTR)

subroutine	free_fichier (FI)

subroutine	new_fa_default ()

subroutine	new_fa (FA, KERR, KPXTRO, KPXLAT, KPXNIV, KPNXFA, KPNXCA)

subroutine	free_fa (FA, KERR)

subroutine	cparams (KPXLAT, KPXTRO, KPXAU1, KPXLON, KPXAU2, KPXPAH, KPXIND, KPXGEO, KPXCSP, KPXPDG, KPXCHA)

Variables
integer(kind=jplikb), parameter	jd_yea = 1

integer(kind=jplikb), parameter	jd_mon = 2

integer(kind=jplikb), parameter	jd_day = 3

integer(kind=jplikb), parameter	jd_hou = 4

integer(kind=jplikb), parameter	jd_min = 5

integer(kind=jplikb), parameter	jd_tun = 6

integer(kind=jplikb), parameter	jd_tho = 7

integer(kind=jplikb), parameter	jd_gr8 = 8

integer(kind=jplikb), parameter	jd_ian = 9

integer(kind=jplikb), parameter	jd_cu1 = 10

integer(kind=jplikb), parameter	jd_cu2 = 11

integer(kind=jplikb), parameter	jd_dex = 12

integer(kind=jplikb), parameter	jd_sem = 14

integer(kind=jplikb), parameter	jd_set = 15

integer(kind=jplikb), parameter	jd_ce1 = 16

integer(kind=jplikb), parameter	jd_ce2 = 17

integer(kind=jplikb), parameter	jd_tst = 18

integer(kind=jplikb), parameter	jd_fmt = 19

integer(kind=jplikb), parameter	jd_siz = 22

integer(kind=jplikb), parameter	jpprcm = JPDBLD / JPDBLR

integer(kind=jplikb), parameter	jngeom = 18_JPLIKB

integer(kind=jplikb), parameter	jnexpl = 8_JPLIKB

integer(kind=jplikb), parameter	jpniil =-999_JPLIKB

integer(kind=jplikb), parameter	jpxnom = 16_JPLIKB

integer(kind=jplikb), parameter	jpxprf = 8_JPLIKB

integer(kind=jplikb), parameter	jpxsuf = JPXNOM+JPXPRF

integer(kind=jplikb), parameter	nundef = JPNIIL

real(kind=jpdblr), parameter	xundef = -99._JPDBLD

logical, parameter	lundef = .FALSE.

character, parameter	cundef = CHAR (0)

integer, save	ngrib2_glo_sh = NUNDEF

integer, save	ngrib2_glo_gp = NUNDEF

integer, save	ngrib2_lam_gp = NUNDEF

integer, save	ngrib2_lam_bf = NUNDEF

integer, save	ngrib1_latlon = NUNDEF

integer, save	ngrib2_latlon = NUNDEF

logical, save	lgrib2_lam_ex = .FALSE.

logical, save	lgrib2_lam_bf = .FALSE.

logical, save	lgrib2_init = .FALSE.

type(fa_com), target, save	fa_com_default

logical, save	fa_com_default_init = .FALSE.

Function/Subroutine Documentation

◆ cparams()

subroutine fa_mod::cparams	(	integer (kind=jplikb), intent(in)	KPXLAT,
		integer (kind=jplikb), intent(in)	KPXTRO,
		integer (kind=jplikb), intent(out)	KPXAU1,
		integer (kind=jplikb), intent(out)	KPXLON,
		integer (kind=jplikb), intent(out)	KPXAU2,
		integer (kind=jplikb), intent(out)	KPXPAH,
		integer (kind=jplikb), intent(out)	KPXIND,
		integer (kind=jplikb), intent(out)	KPXGEO,
		integer (kind=jplikb), intent(out)	KPXCSP,
		integer (kind=jplikb), intent(out)	KPXPDG,
		integer (kind=jplikb), intent(out)	KPXCHA
	)

Definition at line 835 of file fa_mod.F90.

Here is the caller graph for this function:

◆ free_cadre()

subroutine fa_mod::free_cadre ( type (facadr) CA )

Definition at line 565 of file fa_mod.F90.

Here is the caller graph for this function:

◆ free_fa()

subroutine fa_mod::free_fa	(	type(fa_com)	FA,
		integer, intent(out)	KERR
	)

Definition at line 780 of file fa_mod.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ free_fichier()

subroutine fa_mod::free_fichier ( type (fafich) FI )

Definition at line 634 of file fa_mod.F90.

Here is the caller graph for this function:

◆ new_cadre()

subroutine fa_mod::new_cadre	(	type (facadr)	CA,
		integer (kind=jplikb), intent(in)	KTYPTR,
		integer (kind=jplikb), intent(in)	KPXLAT,
		integer (kind=jplikb), intent(in)	KPXTRO,
		integer (kind=jplikb), intent(in)	KPXNIV
	)

Definition at line 482 of file fa_mod.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ new_fa()

subroutine fa_mod::new_fa	(	type(fa_com)	FA,
		integer, intent(out)	KERR,
		integer, intent(in), optional	KPXTRO,
		integer, intent(in), optional	KPXLAT,
		integer, intent(in), optional	KPXNIV,
		integer, intent(in), optional	KPNXFA,
		integer, intent(in), optional	KPNXCA
	)

Definition at line 668 of file fa_mod.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ new_fa_default()

subroutine fa_mod::new_fa_default ( )

Definition at line 649 of file fa_mod.F90.

Here is the call graph for this function:

◆ new_fichier()

subroutine fa_mod::new_fichier	(	type (fa_com)	FA,
		type (fafich)	FI,
		integer (kind=jplikb), intent(in)	KPLDAT,
		integer (kind=jplikb), intent(in)	KPXTRO,
		integer (kind=jplikb), intent(in)	KTYPTR
	)

Definition at line 609 of file fa_mod.F90.

Here is the caller graph for this function:

Variable Documentation

◆ cundef

character, parameter fa_mod::cundef = CHAR (0)

Definition at line 39 of file fa_mod.F90.

◆ fa_com_default

type(fa_com), target, save fa_mod::fa_com_default

Definition at line 476 of file fa_mod.F90.

◆ fa_com_default_init

logical, save fa_mod::fa_com_default_init = .FALSE.

Definition at line 477 of file fa_mod.F90.