radiation_thermodynamics Module

Uses

- PARKIND1
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Contents

Derived Types

thermodynamics_type

Functions

out_of_physical_bounds

Subroutines

allocate_thermodynamics_arrays deallocate_thermodynamics_arrays calc_saturation_wrt_liquid get_layer_mass get_layer_mass_column get_layer_separation

Derived Types

type, public :: thermodynamics_type

Components

Type	Visibility	Attributes		Name		Initial
real(kind=jprb),	public,	allocatable, dimension(:,:)	::	pressure_hl
real(kind=jprb),	public,	allocatable, dimension(:,:)	::	temperature_hl
real(kind=jprb),	public,	allocatable, dimension(:,:)	::	h2o_sat_liq

Type-Bound Procedures

procedure , public :: allocate => allocate_thermodynamics_arrays Subroutine
procedure , public :: deallocate => deallocate_thermodynamics_arrays Subroutine
procedure , public :: calc_saturation_wrt_liquid Subroutine
procedure , public :: get_layer_mass Subroutine
procedure , public :: get_layer_mass_column Subroutine
procedure , public :: out_of_physical_bounds Function

Functions

public function out_of_physical_bounds(this, istartcol, iendcol, do_fix) result(is_bad)

Arguments

Type	Intent	Optional	Attributes		Name
class(thermodynamics_type),	intent(inout)			::	this
integer,	intent(in),	optional		::	istartcol
integer,	intent(in),	optional		::	iendcol
logical,	intent(in),	optional		::	do_fix

Return Value logical

Subroutines

public subroutine allocate_thermodynamics_arrays(this, ncol, nlev, use_h2o_sat)

Arguments

Type	Intent	Optional	Attributes		Name
class(thermodynamics_type),	intent(inout)			::	this
integer,	intent(in)			::	ncol
integer,	intent(in)			::	nlev
logical,	intent(in),	optional		::	use_h2o_sat

public subroutine deallocate_thermodynamics_arrays(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(thermodynamics_type),	intent(inout)			::	this

public subroutine calc_saturation_wrt_liquid(this, istartcol, iendcol)

Arguments

Type	Intent	Optional	Attributes		Name
class(thermodynamics_type),	intent(inout)			::	this
integer,	intent(in)			::	istartcol
integer,	intent(in)			::	iendcol

public subroutine get_layer_mass(this, istartcol, iendcol, layer_mass)

Arguments

Type	Intent	Optional	Attributes		Name
class(thermodynamics_type),	intent(in)			::	this
integer,	intent(in)			::	istartcol
integer,	intent(in)			::	iendcol
real(kind=jprb),	intent(out)			::	layer_mass(:,:)

public subroutine get_layer_mass_column(this, icol, layer_mass)

Arguments

Type	Intent	Optional	Attributes		Name
class(thermodynamics_type),	intent(in)			::	this
integer,	intent(in)			::	icol
real(kind=jprb),	intent(out)			::	layer_mass(:)

public subroutine get_layer_separation(pressure_hl, temperature_hl, layer_separation)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=jprb),	intent(in),		dimension(:,:)	::	pressure_hl
real(kind=jprb),	intent(in),		dimension(:,:)	::	temperature_hl
real(kind=jprb),	intent(out),		dimension(:,:)	::	layer_separation