ozone_type Derived Type

type, public, extends(ozone_base_type) :: ozone_type

Components

Type	Visibility	Attributes		Name		Initial
real(kind=r8),	public,	pointer	::	o3coefvsha_patch(:)
real(kind=r8),	public,	pointer	::	o3coefvsun_patch(:)
real(kind=r8),	public,	pointer	::	o3coefgsha_patch(:)
real(kind=r8),	public,	pointer	::	o3coefgsun_patch(:)

Constructor

public interface ozone_type

private function constructor() result(ozone)

Arguments
None
Return Value type(ozone_type)

Type-Bound Procedures

procedure, public :: InitAllocateBase

private subroutine InitAllocateBase(this, bounds)

Arguments

Type	Intent	Optional	Attributes		Name
class(ozone_base_type),	intent(inout)			::	this
type(bounds_type),	intent(in)			::	bounds

procedure, public :: InitColdBase

private subroutine InitColdBase(this, bounds)

Arguments

Type	Intent	Optional	Attributes		Name
class(ozone_base_type),	intent(inout)			::	this
type(bounds_type),	intent(in)			::	bounds

procedure, public :: Init

private subroutine Init(this, bounds)

Arguments

Type	Intent	Optional	Attributes		Name
class(ozone_type),	intent(inout)			::	this
type(bounds_type),	intent(in)			::	bounds

procedure, public :: Restart

private subroutine Restart(this, bounds, ncid, flag)

Arguments

Type	Intent	Optional	Attributes		Name
class(ozone_type)				::	this
type(bounds_type),	intent(in)			::	bounds
type(file_desc_t),	intent(inout)			::	ncid
character(len=*),	intent(in)			::	flag

procedure, public :: CalcOzoneStress

private subroutine CalcOzoneStress(this, bounds, num_exposedvegp, filter_exposedvegp, forc_pbot, forc_th, rssun, rssha, rb, ram, tlai)

Arguments

Type	Intent	Optional	Attributes		Name
class(ozone_type),	intent(inout)			::	this
type(bounds_type),	intent(in)			::	bounds
integer,	intent(in)			::	num_exposedvegp
integer,	intent(in)			::	filter_exposedvegp(:)
real(kind=r8),	intent(in)			::	forc_pbot(bounds%begc:)
real(kind=r8),	intent(in)			::	forc_th(bounds%begc:)
real(kind=r8),	intent(in)			::	rssun(bounds%begp:)
real(kind=r8),	intent(in)			::	rssha(bounds%begp:)
real(kind=r8),	intent(in)			::	rb(bounds%begp:)
real(kind=r8),	intent(in)			::	ram(bounds%begp:)
real(kind=r8),	intent(in)			::	tlai(bounds%begp:)