Functions/Subroutines
subroutine, public	get_external_ic (Atm, fv_domain, use_geos_latlon_restart, use_geos_cubed_restart, ntracers)

subroutine, public	get_cubed_sphere_terrain (Atm, fv_domain)

subroutine	get_diag_ic (Atm, fv_domain, nq)

subroutine	get_ncep_ic (Atm, fv_domain, nq)

subroutine	get_fv_ic (Atm, fv_domain, nq)

subroutine	ncep2fms (im, jm, lon, lat, wk)

subroutine	remap_coef (im, jm, lon, lat, id1, id2, jdc, s2c, agrid, bd)

subroutine	remap_scalar (im, jm, km, npz, nq, ncnst, ak0, bk0, psc, gzc, ta, qa, Atm)

subroutine	remap_winds (im, jm, km, npz, ak0, bk0, psc, ua, va, Atm)

subroutine	remap_wz (im, jm, km, npz, mg, ak0, bk0, psc, wa, wz, Atm)

subroutine	remap_xyz (im, jbeg, jend, jm, km, npz, nq, ncnst, lon, lat, ak0, bk0, ps0, gz0, ua, va, ta, qa, Atm)

real(fvprc) function, dimension(size(a, 1), size(a, 2))	reverse (A)

subroutine	cubed_a2d (npx, npy, npz, ua, va, u, v, gridstruct, fv_domain, bd)

subroutine	d2a3d (u, v, ua, va, im, jm, km, lon)

subroutine	pmaxmin (qname, a, im, jm, fac)

subroutine	pmaxmin4d (qname, a, im, jm, km, lm, fac)

subroutine	mpp_domain_decomp (domain, npx, npy, nregions, ng, grid_type, is, ie, js, je, isd, ied, jsd, jed, tile)

subroutine	parallel_read_file_r8 (fname, npts, is, ie, js, je, km, offset, var)

subroutine	parallel_read_file_r4 (fname, npts, is, ie, js, je, km, offset, var)

Variables
real(fvprc), parameter	zvir = rvgas/rdgas - 1.

real(fvprc)	deg2rad

integer, save	tile

integer, save	npes_x

integer, save	npes_y

integer	status

integer	iunit =15

integer	ounit =16

Function/Subroutine Documentation

◆ cubed_a2d()

subroutine external_ic_nlm_mod::cubed_a2d	(	integer, intent(in)	npx,
		integer, intent(in)	npy,
		integer, intent(in)	npz,
		real(fvprc), dimension(bd%isd:bd%ied,bd%jsd:bd%jed,npz), intent(inout)	ua,
		real(fvprc), dimension(bd%isd:bd%ied,bd%jsd:bd%jed,npz), intent(inout)	va,
		real(fvprc), dimension(bd%isd:bd%ied, bd%jsd:bd%jed+1,npz), intent(out)	u,
		real(fvprc), dimension(bd%isd:bd%ied+1,bd%jsd:bd%jed ,npz), intent(out)	v,
		type(fv_grid_type), intent(in), target	gridstruct,
		type(domain2d), intent(inout)	fv_domain,
		type(fv_grid_bounds_type), intent(in)	bd
	)

private

Definition at line 2969 of file external_ic_nlm.F90.

Here is the caller graph for this function:

◆ d2a3d()

subroutine external_ic_nlm_mod::d2a3d	(	real(fvprc), dimension(im,jm,km), intent(in)	u,
		real(fvprc), dimension(im,jm,km), intent(in)	v,
		real(fvprc), dimension(im,jm,km), intent(out)	ua,
		real(fvprc), dimension(im,jm,km), intent(out)	va,
		integer, intent(in)	im,
		integer, intent(in)	jm,
		integer, intent(in)	km,
		real(fvprc), dimension(im), intent(in)	lon
	)

Definition at line 3156 of file external_ic_nlm.F90.

◆ get_cubed_sphere_terrain()

subroutine, public external_ic_nlm_mod::get_cubed_sphere_terrain	(	type(fv_atmos_type), dimension(:), intent(inout)	Atm,
		type(domain2d), intent(inout)	fv_domain
	)

Definition at line 168 of file external_ic_nlm.F90.

Here is the caller graph for this function:

◆ get_diag_ic()

subroutine external_ic_nlm_mod::get_diag_ic	(	type(fv_atmos_type), dimension(:), intent(inout)	Atm,
		type(domain2d), intent(inout)	fv_domain,
		integer, intent(in)	nq
	)

private

Definition at line 214 of file external_ic_nlm.F90.

Here is the caller graph for this function:

◆ get_external_ic()

subroutine, public external_ic_nlm_mod::get_external_ic	(	type(fv_atmos_type), dimension(:), intent(inout)	Atm,
		type(domain2d), intent(inout)	fv_domain,
		logical, intent(in), optional	use_geos_latlon_restart,
		logical, intent(in), optional	use_geos_cubed_restart,
		integer, dimension(3), intent(in), optional	ntracers
	)

Definition at line 80 of file external_ic_nlm.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ get_fv_ic()

subroutine external_ic_nlm_mod::get_fv_ic	(	type(fv_atmos_type), dimension(:), intent(inout)	Atm,
		type(domain2d), intent(inout)	fv_domain,
		integer, intent(in)	nq
	)

private

Definition at line 1836 of file external_ic_nlm.F90.

Here is the caller graph for this function:

◆ get_ncep_ic()

subroutine external_ic_nlm_mod::get_ncep_ic	(	type(fv_atmos_type), dimension(:), intent(inout)	Atm,
		type(domain2d), intent(inout)	fv_domain,
		integer, intent(in)	nq
	)

private

Definition at line 1567 of file external_ic_nlm.F90.

Here is the caller graph for this function:

◆ mpp_domain_decomp()

subroutine external_ic_nlm_mod::mpp_domain_decomp	(	type(domain2d), intent(out)	domain,
		integer, intent(in)	npx,
		integer, intent(in)	npy,
		integer, intent(in)	nregions,
		integer, intent(in)	ng,
		integer, intent(in)	grid_type,
		integer, intent(out)	is,
		integer, intent(out)	ie,
		integer, intent(out)	js,
		integer, intent(out)	je,
		integer, intent(out)	isd,
		integer, intent(out)	ied,
		integer, intent(out)	jsd,
		integer, intent(out)	jed,
		integer, intent(out)	tile
	)

private

Definition at line 3297 of file external_ic_nlm.F90.

Here is the call graph for this function:

◆ ncep2fms()

subroutine external_ic_nlm_mod::ncep2fms	(	integer, intent(in)	im,
		integer, intent(in)	jm,
		real(fvprc), dimension(im), intent(in)	lon,
		real(fvprc), dimension(jm), intent(in)	lat,
		real(kind=4), dimension(im,jm), intent(in)	wk
	)

private

Definition at line 1983 of file external_ic_nlm.F90.

◆ parallel_read_file_r4()

subroutine external_ic_nlm_mod::parallel_read_file_r4	(	character(len=*), intent(in)	fname,
		integer, intent(in)	npts,
		integer, intent(in)	is,
		integer, intent(in)	ie,
		integer, intent(in)	js,
		integer, intent(in)	je,
		integer, intent(in)	km,
		integer (kind=mpi_offset_kind), intent(inout)	offset,
		real(fvprc), dimension(is:ie, js:je, km), intent(inout)	var
	)

private

Definition at line 3613 of file external_ic_nlm.F90.

◆ parallel_read_file_r8()

subroutine external_ic_nlm_mod::parallel_read_file_r8	(	character(len=*), intent(in)	fname,
		integer, intent(in)	npts,
		integer, intent(in)	is,
		integer, intent(in)	ie,
		integer, intent(in)	js,
		integer, intent(in)	je,
		integer, intent(in)	km,
		integer (kind=mpi_offset_kind), intent(inout)	offset,
		real(fvprc), dimension(is:ie, js:je, km), intent(inout)	var
	)

Definition at line 3555 of file external_ic_nlm.F90.

◆ pmaxmin()

subroutine external_ic_nlm_mod::pmaxmin	(	character(len=*)	qname,
		real(fvprc), dimension(im,jm)	a,
		integer, intent(in)	im,
		integer, intent(in)	jm,
		real(fvprc)	fac
	)

private

Definition at line 3232 of file external_ic_nlm.F90.

◆ pmaxmin4d()

subroutine external_ic_nlm_mod::pmaxmin4d	(	character()	qname,
		real(fvprc), dimension(im,jm,km,lm)	a,
		integer, intent(in)	im,
		integer, intent(in)	jm,
		integer, intent(in)	km,
		integer, intent(in)	lm,
		real(fvprc)	fac
	)

private

Definition at line 3267 of file external_ic_nlm.F90.

◆ remap_coef()

subroutine external_ic_nlm_mod::remap_coef	(	integer, intent(in)	im,
		integer, intent(in)	jm,
		real(fvprc), dimension(im), intent(in)	lon,
		real(fvprc), dimension(jm), intent(in)	lat,
		integer, dimension(bd%is:bd%ie,bd%js:bd%je), intent(out)	id1,
		integer, dimension(bd%is:bd%ie,bd%js:bd%je), intent(out)	id2,
		integer, dimension(bd%is:bd%ie,bd%js:bd%je), intent(out)	jdc,
		real(fvprc), dimension(bd%is:bd%ie,bd%js:bd%je,4), intent(out)	s2c,
		real(fvprc), dimension(bd%isd:bd%ied,bd%jsd:bd%jed,2), intent(in)	agrid,
		type(fv_grid_bounds_type), intent(in)	bd
	)

private

Definition at line 2074 of file external_ic_nlm.F90.

◆ remap_scalar()

subroutine external_ic_nlm_mod::remap_scalar	(	integer, intent(in)	im,
		integer, intent(in)	jm,
		integer, intent(in)	km,
		integer, intent(in)	npz,
		integer, intent(in)	nq,
		integer, intent(in)	ncnst,
		real(fvprc), dimension(km+1), intent(in)	ak0,
		real(fvprc), dimension(km+1), intent(in)	bk0,
		real(fvprc), dimension(atm%bd%is:atm%bd%ie,atm%bd%js:atm%bd%je), intent(in)	psc,
		real(fvprc), dimension(atm%bd%is:atm%bd%ie,atm%bd%js:atm%bd%je), intent(in)	gzc,
		real(fvprc), dimension(atm%bd%is:atm%bd%ie,atm%bd%js:atm%bd%je,km), intent(in)	ta,
		real(fvprc), dimension(atm%bd%is:atm%bd%ie,atm%bd%js:atm%bd%je,km,ncnst), intent(in)	qa,
		type(fv_atmos_type), intent(inout)	Atm
	)

private

Definition at line 2162 of file external_ic_nlm.F90.

Here is the call graph for this function:

◆ remap_winds()

subroutine external_ic_nlm_mod::remap_winds	(	integer, intent(in)	im,
		integer, intent(in)	jm,
		integer, intent(in)	km,
		integer, intent(in)	npz,
		real(fvprc), dimension(km+1), intent(in)	ak0,
		real(fvprc), dimension(km+1), intent(in)	bk0,
		real(fvprc), dimension(is:ie,js:je), intent(in)	psc,
		real(fvprc), dimension(is:ie,js:je,km), intent(in)	ua,
		real(fvprc), dimension(is:ie,js:je,km), intent(in)	va,
		type(fv_atmos_type), dimension(:), intent(inout)	Atm
	)

private

Definition at line 2334 of file external_ic_nlm.F90.

Here is the call graph for this function:

◆ remap_wz()

subroutine external_ic_nlm_mod::remap_wz	(	integer, intent(in)	im,
		integer, intent(in)	jm,
		integer, intent(in)	km,
		integer, intent(in)	npz,
		integer, intent(in)	mg,
		real(fvprc), dimension(km+1), intent(in)	ak0,
		real(fvprc), dimension(km+1), intent(in)	bk0,
		real(fvprc), dimension(is:ie,js:je), intent(in)	psc,
		real(fvprc), dimension(is:ie,js:je,km), intent(in)	wa,
		real(fvprc), dimension(is-mg:ie+mg,js-mg:je+mg,npz), intent(out)	wz,
		type(fv_atmos_type), dimension(:), intent(inout)	Atm
	)

private

Definition at line 2398 of file external_ic_nlm.F90.

Here is the call graph for this function:

◆ remap_xyz()

subroutine external_ic_nlm_mod::remap_xyz	(	integer, intent(in)	im,
		integer, intent(in)	jbeg,
		integer, intent(in)	jend,
		integer, intent(in)	jm,
		integer, intent(in)	km,
		integer, intent(in)	npz,
		integer, intent(in)	nq,
		integer, intent(in)	ncnst,
		real(fvprc), dimension(im), intent(in)	lon,
		real(fvprc), dimension(jm), intent(in)	lat,
		real(fvprc), dimension(km+1), intent(in)	ak0,
		real(fvprc), dimension(km+1), intent(in)	bk0,
		real(fvprc), dimension(im,jbeg:jend), intent(in)	ps0,
		real(fvprc), dimension(im,jbeg:jend), intent(in)	gz0,
		real(fvprc), dimension(im,jbeg:jend,km), intent(in)	ua,
		real(fvprc), dimension(im,jbeg:jend,km), intent(in)	va,
		real(fvprc), dimension(im,jbeg:jend,km), intent(in)	ta,
		real(fvprc), dimension(im,jbeg:jend,km,ncnst), intent(in)	qa,
		type(fv_atmos_type), intent(inout), target	Atm
	)

private

Definition at line 2444 of file external_ic_nlm.F90.

Here is the call graph for this function:

◆ reverse()

real(fvprc) function, dimension(size(a,1),size(a,2)) external_ic_nlm_mod::reverse ( real(fvprc), dimension(:,:), intent(in) A )

private

Definition at line 2955 of file external_ic_nlm.F90.

Variable Documentation

◆ deg2rad

real(fvprc) external_ic_nlm_mod::deg2rad

private

Definition at line 67 of file external_ic_nlm.F90.

◆ iunit

integer external_ic_nlm_mod::iunit =15

private

Definition at line 74 of file external_ic_nlm.F90.

◆ npes_x

integer, save external_ic_nlm_mod::npes_x

private

Definition at line 71 of file external_ic_nlm.F90.

◆ npes_y

integer, save external_ic_nlm_mod::npes_y

private

Definition at line 71 of file external_ic_nlm.F90.

◆ ounit

integer external_ic_nlm_mod::ounit =16

private

Definition at line 75 of file external_ic_nlm.F90.

◆ status

integer external_ic_nlm_mod::status

private

Definition at line 73 of file external_ic_nlm.F90.

◆ tile

integer, save external_ic_nlm_mod::tile

private

Definition at line 71 of file external_ic_nlm.F90.

◆ zvir

real(fvprc), parameter external_ic_nlm_mod::zvir = rvgas/rdgas - 1.

private

Definition at line 66 of file external_ic_nlm.F90.

Functions/Subroutines

Variables

Function/Subroutine Documentation

◆ cubed_a2d()

◆ d2a3d()

◆ get_cubed_sphere_terrain()

◆ get_diag_ic()

◆ get_external_ic()

◆ get_fv_ic()

◆ get_ncep_ic()

◆ mpp_domain_decomp()

◆ ncep2fms()

◆ parallel_read_file_r4()

◆ parallel_read_file_r8()

◆ pmaxmin()

◆ pmaxmin4d()

◆ remap_coef()

◆ remap_scalar()

◆ remap_winds()

◆ remap_wz()

◆ remap_xyz()

◆ reverse()

Variable Documentation

◆ deg2rad

◆ iunit

◆ npes_x

◆ npes_y

◆ ounit

◆ status

◆ tile

◆ zvir