eggpack Module Reference

Data Types
type	delta
type	domi
type	error
interface	gn
interface	info_print
interface	latlon_to_xy
interface	map_factor
type	nbpts
type	param_proj
type	pgn
type	rteta
interface	stlp_rteta_to_latlon
interface	stlp_rteta_to_xy
interface	stlp_xy_to_rteta
interface	stpl_latlon_to_rteta
type	xy
interface	xy_new_to_std_origin
interface	xy_std_to_new_origin
interface	xy_to_latlon

Functions/Subroutines
subroutine	info_domi_print (YD_G_INFO, KOUT, PI)
subroutine	info_pp_print (P_P, KOUT, PI)
logical function	return_print (YD_CODE_ERR, K_NUM_TEST, AUTO_STOP, KOUT)
character(len=1) function	type_proj (REF_COORD)
real(kind=jprd) function	pole_is (REF_COORD)
type(rteta) function	stpl_latlon_to_rteta_s (PT_COORD, P_PJ, PI)
type(xy) function	stlp_rteta_to_xy_s (PT_RTETA, P_PJ)
type(rteta) function	stlp_xy_to_rteta_s (PT_XY, P_PJ, PI)
type(lola) function	stlp_rteta_to_latlon_s (PT_RTETA, P_PJ, PI)
type(rteta) function, dimension(size(pt_coord))	stpl_latlon_to_rteta_v (PT_COORD, P_PJ, PI)
type(xy) function, dimension(size(pt_rteta))	stlp_rteta_to_xy_v (PT_RTETA, P_PJ)
type(rteta) function, dimension(size(pt_xy))	stlp_xy_to_rteta_v (PT_XY, P_PJ, PI)
type(lola) function, dimension(size(pt_rteta))	stlp_rteta_to_latlon_v (PT_RTETA, P_PJ, PI)
type(param_proj) function	ref_datas (REF_COORD, RA, TOZERO_COORD, LRT)
type(xy) function	xy_new_to_std_origin_s (NEW_ORIGIN_COORD, PT_XY_IN_NEW_ORIGIN, P_PJ, PI)
type(xy) function	xy_std_to_new_origin_s (NEW_ORIGIN_COORD, PT_XY_IN_STD_ORIGIN, P_PJ, PI)
type(xy) function, dimension(size(pt_xy_in_new_origin))	xy_new_to_std_origin_v (NEW_ORIGIN_COORD, PT_XY_IN_NEW_ORIGIN, P_PJ, PI)
type(xy) function, dimension(size(yl_pt_xy_in_std_origin))	xy_std_to_new_origin_v (YL_NEW_ORIGIN_COORD, YL_PT_XY_IN_STD_ORIGIN, P_PJ, PI)
type(xy) function	latlon_to_xy_s (PT_COORD, P_PJ, PI)
type(lola) function	xy_to_latlon_s (PT_XY, P_PJ, PI)
type(xy) function, dimension(size(pt_coord))	latlon_to_xy_v (PT_COORD, P_PJ, PI)
type(lola) function, dimension(size(yl_pt_xy))	xy_to_latlon_v (YL_PT_XY, P_PJ, PI)
real(kind=jprd) function	map_factor_s (PT_COORD, P_PJ, PI, RA)
real(kind=jprd) function, dimension(size(pt_coord))	map_factor_v (PT_COORD, P_PJ, PI, RA)
type(pgn) function	gn_s (PT_COORD, P_PJ)
type(pgn) function, dimension(size(yd_pt_coord))	gn_v (YD_PT_COORD, YD_P_PJ)
subroutine	makdo (YD_REF_COORD, YD_CENTER_COORD, YD_PDEL, YD_NB_PTS, YD_GRID_COORD, P_GRID_MF, YD_GRID_PGN, YD_GRID_INFO, YD_ERR_CODE, LD_LIP, LD_AUTO_STOP, PI, P_RA, KOUT, LD_LMRT)

Variables
real(kind=jprd), parameter, public	r_earth = 6371229._JPRD

Function/Subroutine Documentation

gn_s()

type (pgn) function eggpack::gn_s	(	type (lola), intent(in)	PT_COORD,
		type (param_proj), intent(in)	P_PJ
	)

Definition at line 1070 of file eggpack.F90.

gn_v()

type (pgn) function, dimension(size(yd_pt_coord)) eggpack::gn_v	(	type (lola), dimension(:), intent(in)	YD_PT_COORD,
		type (param_proj), intent(in)	YD_P_PJ
	)

Definition at line 1095 of file eggpack.F90.

info_domi_print()

subroutine eggpack::info_domi_print	(	type (domi), intent(in)	YD_G_INFO,
		integer(kind=jpim), intent(in), optional	KOUT,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 364 of file eggpack.F90.

info_pp_print()

subroutine eggpack::info_pp_print	(	type (param_proj), intent(in)	P_P,
		integer(kind=jpim), intent(in), optional	KOUT,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 412 of file eggpack.F90.

latlon_to_xy_s()

type (xy) function eggpack::latlon_to_xy_s	(	type (lola), intent(in)	PT_COORD,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 875 of file eggpack.F90.

latlon_to_xy_v()

type (xy) function, dimension(size(pt_coord)) eggpack::latlon_to_xy_v	(	type (lola), dimension(:), intent(in)	PT_COORD,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 937 of file eggpack.F90.

makdo()

subroutine eggpack::makdo	(	type (lola), intent(inout)	YD_REF_COORD,
		type (lola), intent(inout)	YD_CENTER_COORD,
		type (delta), intent(in)	YD_PDEL,
		type (nbpts), intent(in)	YD_NB_PTS,
		type (lola), dimension(yd_nb_pts%onx,yd_nb_pts%ony), intent(out)	YD_GRID_COORD,
		real(kind=jprd), dimension(yd_nb_pts%onx,yd_nb_pts%ony), intent(out)	P_GRID_MF,
		type (pgn), dimension(yd_nb_pts%onx,yd_nb_pts%ony), intent(out)	YD_GRID_PGN,
		type (domi), intent(out)	YD_GRID_INFO,
		type (error), intent(out)	YD_ERR_CODE,
		logical, intent(in), optional	LD_LIP,
		logical, intent(in), optional	LD_AUTO_STOP,
		real(kind=jprd), intent(in), optional	PI,
		real(kind=jprd), intent(in), optional	P_RA,
		integer(kind=jpim), intent(in), optional	KOUT,
		logical, intent(in), optional	LD_LMRT
	)

Definition at line 1128 of file eggpack.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

map_factor_s()

real(kind=jprd) function eggpack::map_factor_s	(	type (lola), intent(in)	PT_COORD,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI,
		real(kind=jprd), intent(in), optional	RA
	)

Definition at line 1003 of file eggpack.F90.

map_factor_v()

real(kind=jprd) function, dimension(size(pt_coord)) eggpack::map_factor_v	(	type (lola), dimension(:), intent(in)	PT_COORD,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI,
		real(kind=jprd), intent(in), optional	RA
	)

Definition at line 1036 of file eggpack.F90.

pole_is()

real(kind=jprd) function eggpack::pole_is

(

type (lola), intent(in)

REF_COORD

)

Definition at line 519 of file eggpack.F90.

Here is the caller graph for this function:

ref_datas()

type (param_proj) function eggpack::ref_datas	(	type (lola), intent(in)	REF_COORD,
		real(kind=jprd), intent(in), optional	RA,
		type (lola), intent(in), optional	TOZERO_COORD,
		logical, intent(in), optional	LRT
	)

Definition at line 729 of file eggpack.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

return_print()

logical function eggpack::return_print	(	type (error), intent(in)	YD_CODE_ERR,
		integer(kind=jpim), intent(in)	K_NUM_TEST,
		logical, intent(in), optional	AUTO_STOP,
		integer(kind=jpim), intent(in), optional	KOUT
	)

Definition at line 458 of file eggpack.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

stlp_rteta_to_latlon_s()

type (lola) function eggpack::stlp_rteta_to_latlon_s	(	type (rteta), intent(in)	PT_RTETA,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 610 of file eggpack.F90.

stlp_rteta_to_latlon_v()

type (lola) function, dimension(size(pt_rteta)) eggpack::stlp_rteta_to_latlon_v	(	type (rteta), dimension(:), intent(in)	PT_RTETA,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 703 of file eggpack.F90.

stlp_rteta_to_xy_s()

type (xy) function eggpack::stlp_rteta_to_xy_s	(	type (rteta), intent(in)	PT_RTETA,
		type (param_proj), intent(in)	P_PJ
	)

Definition at line 560 of file eggpack.F90.

stlp_rteta_to_xy_v()

type (xy) function, dimension(size(pt_rteta)) eggpack::stlp_rteta_to_xy_v	(	type (rteta), dimension(:), intent(in)	PT_RTETA,
		type (param_proj), intent(in)	P_PJ
	)

Definition at line 651 of file eggpack.F90.

stlp_xy_to_rteta_s()

type (rteta) function eggpack::stlp_xy_to_rteta_s	(	type (xy), intent(in)	PT_XY,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 573 of file eggpack.F90.

Here is the call graph for this function:

stlp_xy_to_rteta_v()

type (rteta) function, dimension(size(pt_xy)) eggpack::stlp_xy_to_rteta_v	(	type (xy), dimension(:), intent(in)	PT_XY,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 665 of file eggpack.F90.

Here is the call graph for this function:

stpl_latlon_to_rteta_s()

type (rteta) function eggpack::stpl_latlon_to_rteta_s	(	type (lola), intent(in)	PT_COORD,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 540 of file eggpack.F90.

stpl_latlon_to_rteta_v()

type (rteta) function, dimension(size(pt_coord)) eggpack::stpl_latlon_to_rteta_v	(	type (lola), dimension(:), intent(in)	PT_COORD,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 630 of file eggpack.F90.

type_proj()

character(len=1) function eggpack::type_proj

(

type (lola), intent(in)

REF_COORD

)

Definition at line 501 of file eggpack.F90.

Here is the caller graph for this function:

xy_new_to_std_origin_s()

type (xy) function eggpack::xy_new_to_std_origin_s	(	type (lola), intent(in)	NEW_ORIGIN_COORD,
		type (xy), intent(in)	PT_XY_IN_NEW_ORIGIN,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 779 of file eggpack.F90.

xy_new_to_std_origin_v()

type (xy) function, dimension(size(pt_xy_in_new_origin)) eggpack::xy_new_to_std_origin_v	(	type (lola), intent(in)	NEW_ORIGIN_COORD,
		type (xy), dimension(:), intent(in)	PT_XY_IN_NEW_ORIGIN,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 825 of file eggpack.F90.

xy_std_to_new_origin_s()

type (xy) function eggpack::xy_std_to_new_origin_s	(	type (lola), intent(in)	NEW_ORIGIN_COORD,
		type (xy), intent(in)	PT_XY_IN_STD_ORIGIN,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 802 of file eggpack.F90.

xy_std_to_new_origin_v()

type (xy) function, dimension(size(yl_pt_xy_in_std_origin)) eggpack::xy_std_to_new_origin_v	(	type (lola), intent(in)	YL_NEW_ORIGIN_COORD,
		type (xy), dimension(:), intent(in)	YL_PT_XY_IN_STD_ORIGIN,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 849 of file eggpack.F90.

xy_to_latlon_s()

type (lola) function eggpack::xy_to_latlon_s	(	type (xy), intent(in)	PT_XY,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 907 of file eggpack.F90.

xy_to_latlon_v()

type (lola) function, dimension(size(yl_pt_xy)) eggpack::xy_to_latlon_v	(	type (xy), dimension(:), intent(in)	YL_PT_XY,
		type (param_proj), intent(in)	P_PJ,
		real(kind=jprd), intent(in), optional	PI
	)

Definition at line 970 of file eggpack.F90.

Variable Documentation

r_earth

real(kind=jprd), parameter, public eggpack::r_earth = 6371229._JPRD

Definition at line 265 of file eggpack.F90.