geopotential Module

  1. geopotential.f90
  2. geopotential

For performing geopotential calculations.


Uses

  • module~~geopotential~~UsesGraph module~geopotential geopotential module~geometry geometry module~geopotential->module~geometry module~types types module~geopotential->module~types module~params params module~geopotential->module~params module~geometry->module~types module~geometry->module~params iso_fortran_env iso_fortran_env module~types->iso_fortran_env module~params->module~types

Used by

  • module~~geopotential~~UsedByGraph module~geopotential geopotential proc~initialize_state initialize_state proc~initialize_state->module~geopotential proc~get_grid_point_tendencies get_grid_point_tendencies proc~get_grid_point_tendencies->module~geopotential proc~get_spectral_tendencies get_spectral_tendencies proc~get_spectral_tendencies->module~geopotential

Contents

Functions

Subroutines


Functions

private function get_geopotential(t, phis, xgeop1, xgeop2, hsg, fsg) result(phi)

Arguments

Type IntentOptional AttributesName
complex(kind=p), intent(in) :: t(mx,nx,kx)

Spectral temperature
complex(kind=p), intent(in) :: phis(mx,nx)

Spectral surface geopotential
real(kind=p), intent(in) :: xgeop1(kx)

Constants for hydrostatic equation
real(kind=p), intent(in) :: xgeop2(kx)

Constants for hydrostatic equation
real(kind=p), intent(in) :: hsg(kx+1)

Half sigma levels
real(kind=p), intent(in) :: fsg(kx)

Full sigma levels

Return Value complex(kind=p) (mx,nx,kx)

Spectral geopotential


Subroutines

public subroutine initialize_geopotential(state)

Initializes the arrays used for geopotential calculations

Arguments

Type IntentOptional AttributesName
type(ModelState_t), intent(inout), target:: state

public subroutine set_geopotential(state, time_level)

Computes spectral geopotential from spectral temperature T and spectral topography phis, as in GFDL Climate Group GCM. The result is updated in the state%phi variable.

Arguments

Type IntentOptional AttributesName
type(ModelState_t), intent(inout) :: state
integer, intent(in) :: time_level