Public Member Functions
subroutine	find_ang
	Find the rotation angle on center (Ct) grid points. More...

subroutine	find_angq
	Find the rotation angle on corner grid (Bu) points using the full MOM6 supergrid. More...

real(dbl_kind) function	modulo_around_point (x, xc, Lx)
	Return the modulo value of x in an interval [xc-(Lx/2) xc+(Lx/2)] If Lx<=0, then it returns x without applying modulo arithmetic. More...

Detailed Description

Definition at line 10 of file angles.F90.

Member Function/Subroutine Documentation

subroutine angles::find_ang ( )

Find the rotation angle on center (Ct) grid points.

Definition at line 133 of file angles.F90.

Referenced by gen_fixgrid().

subroutine angles::find_angq ( )

Find the rotation angle on corner grid (Bu) points using the full MOM6 supergrid.

Definition at line 25 of file angles.F90.

Referenced by gen_fixgrid().

real(dbl_kind) function angles::modulo_around_point	(	real(dbl_kind), intent(in)	x,
		real(dbl_kind), intent(in)	xc,
		real(dbl_kind), intent(in)	Lx
	)

Return the modulo value of x in an interval [xc-(Lx/2) xc+(Lx/2)] If Lx<=0, then it returns x without applying modulo arithmetic.

From src/initialization/MOM_shared_initialization.F90:

Parameters

[in]	x	Value to which to apply modulo arithmetic
[in]	xc	Center of modulo range
[in]	Lx	Modulo range width

Returns: x_mod Value x shifted by an integer multiple of Lx to be close to xc

Definition at line 190 of file angles.F90.

The documentation for this module was generated from the following file:

/gpfs/dell2/emc/modeling/noscrub/George.Gayno/ufs_utils.git/UFS_UTILS.upstream/sorc/cpld_gridgen.fd/angles.F90