angles.F90 File Reference

Determine the rotation angle on center and corner points. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	angles::find_ang
	Find the rotation angle on center (Ct) grid points. More...
subroutine	angles::find_angq
	Find the rotation angle on corner grid (Bu) points using the full MOM6 supergrid. More...
real(dbl_kind) function	angles::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

Determine the rotation angle on center and corner points.

Author

Denis.nosp@m.e.Wo.nosp@m.rthen.nosp@m.@noa.nosp@m.a.gov

This module finds the rotation angle for at both center and corner points It utilizes the MOM6 function modulo_around_point

Author

Denis.nosp@m.e.Wo.nosp@m.rthen.nosp@m.@noa.nosp@m.a.gov

Definition in file angles.F90.

Function/Subroutine Documentation

find_ang()

subroutine angles::find_ang

(

)

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

Author

Denis.nosp@m.e.Wo.nosp@m.rthen.nosp@m.@noa.nosp@m.a.gov

Definition at line 132 of file angles.F90.

find_angq()

subroutine angles::find_angq

(

)

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

Author

Denis.nosp@m.e.Wo.nosp@m.rthen.nosp@m.@noa.nosp@m.a.gov

Definition at line 26 of file angles.F90.

modulo_around_point()

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 189 of file angles.F90.