ESMF_ComplianceICMod Module

Uses

- ESMF
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.
Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Used by

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.
Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Variables

Type	Visibility	Attributes		Name		Initial
integer,	private,	save	::	ccfDepth	=	1
integer,	private,	save	::	maxDepth	=	-2
logical,	private,	save	::	complianceInit	=	.false.
logical,	private,	save	::	includeState	=	.true.
logical,	private,	save	::	includeVmStats	=	.true.
logical,	private,	save	::	outputJSON	=	.false.
logical,	private,	save	::	outputText	=	.true.
logical,	private,	save	::	outputTrace	=	.false.

Interfaces

private interface JSON_GetID

private recursive subroutine JSON_GridCompGetID(comp, id, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_GridComp)				::	comp
character(len=*),	intent(out)			::	id
integer,	intent(out)			::	rc

private recursive subroutine JSON_StateGetID(state, id, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_State)				::	state
character(len=*),	intent(out)			::	id
integer,	intent(out)			::	rc

private recursive subroutine JSON_FieldGetID(field, id, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_Field)				::	field
character(len=*),	intent(out)			::	id
integer,	intent(out)			::	rc

Functions

private recursive function zeroTerminatedString(string)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	string

Return Value logical

Subroutines

private recursive subroutine ComplianceInitialize(rc)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(out),	optional		::	rc

private recursive subroutine Compliance_LogWrite(msg, msgType, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	msg
type(ESMF_LogMsg_Flag),	intent(in),	optional		::	msgType
integer,	intent(out),	optional		::	rc

private recursive subroutine JSON_FieldGetID(field, id, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_Field)				::	field
character(len=*),	intent(out)			::	id
integer,	intent(out)			::	rc

private recursive subroutine JSON_GridCompGetID(comp, id, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_GridComp)				::	comp
character(len=*),	intent(out)			::	id
integer,	intent(out)			::	rc

private recursive subroutine JSON_LogCtrlFlow(event, comp, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	event
type(ESMF_GridComp),	intent(in)			::	comp
integer,	intent(out),	optional		::	rc

private recursive subroutine JSON_LogWrite(msg, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	msg
integer,	intent(out),	optional		::	rc

private recursive subroutine JSON_StateGetID(state, id, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_State)				::	state
character(len=*),	intent(out)			::	id
integer,	intent(out)			::	rc

private recursive subroutine checkComponentAttribute(prefix, comp, attributeName, convention, purpose, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	prefix
type(ESMF_GridComp)				::	comp
character(len=*),	intent(in)			::	attributeName
character(len=*),	intent(in)			::	convention
character(len=*),	intent(in)			::	purpose
integer,	intent(out),	optional		::	rc

private recursive subroutine checkComponentMetadata(prefix, comp, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	prefix
type(ESMF_GridComp)				::	comp
integer,	intent(out),	optional		::	rc

private recursive subroutine checkComponentStatistics(prefix, comp, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	prefix
type(ESMF_GridComp)				::	comp
integer,	intent(out),	optional		::	rc

private recursive subroutine checkFieldAttribute(prefix, field, attributeName, convention, purpose, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	prefix
type(ESMF_Field)				::	field
character(len=*),	intent(in)			::	attributeName
character(len=*),	intent(in)			::	convention
character(len=*),	intent(in)			::	purpose
integer,	intent(out),	optional		::	rc

private recursive subroutine checkFieldMetadata(prefix, field, stateid, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	prefix
type(ESMF_Field)				::	field
character(len=*),	intent(in),	optional		::	stateid
integer,	intent(out),	optional		::	rc

private recursive subroutine checkInternalClock(prefix, comp, clock, mustMatchCurr, mustReachStop, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	prefix
type(ESMF_GridComp)				::	comp
type(ESMF_Clock),	intent(in)			::	clock
logical,	intent(in)			::	mustMatchCurr
logical,	intent(in)			::	mustReachStop
integer,	intent(out),	optional		::	rc

private recursive subroutine checkState(prefix, referenceName, state, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	prefix
character(len=*),	intent(in)			::	referenceName
type(ESMF_State)				::	state
integer,	intent(out),	optional		::	rc

private recursive subroutine checkStateAttribute(prefix, state, attributeName, convention, purpose, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	prefix
type(ESMF_State)				::	state
character(len=*),	intent(in)			::	attributeName
character(len=*),	intent(in)			::	convention
character(len=*),	intent(in)			::	purpose
integer,	intent(out),	optional		::	rc

private recursive subroutine clockUsageIncoming(prefix, clock, clockCopy, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	prefix
type(ESMF_Clock),	intent(in)			::	clock
type(ESMF_Clock),	intent(inout)			::	clockCopy
integer,	intent(out),	optional		::	rc

private recursive subroutine clockUsageOutgoing(prefix, clock, clockCopy, rc)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	prefix
type(ESMF_Clock),	intent(in)			::	clock
type(ESMF_Clock),	intent(inout)			::	clockCopy
integer,	intent(out),	optional		::	rc

private recursive subroutine ic_final(comp, importState, exportState, clock, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_GridComp)				::	comp
type(ESMF_State)				::	importState
type(ESMF_State)				::	exportState
type(ESMF_Clock)				::	clock
integer,	intent(out)			::	rc

private recursive subroutine ic_init(comp, importState, exportState, clock, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_GridComp)				::	comp
type(ESMF_State)				::	importState
type(ESMF_State)				::	exportState
type(ESMF_Clock)				::	clock
integer,	intent(out)			::	rc

private recursive subroutine ic_run(comp, importState, exportState, clock, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_GridComp)				::	comp
type(ESMF_State)				::	importState
type(ESMF_State)				::	exportState
type(ESMF_Clock)				::	clock
integer,	intent(out)			::	rc

private recursive subroutine prefixString(comp, prefix, forward, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_GridComp)				::	comp
character(len=*),	intent(inout)			::	prefix
logical,	intent(in),	optional		::	forward
integer,	intent(out),	optional		::	rc

public recursive subroutine registerIC(comp, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_GridComp)				::	comp
integer,	intent(out)			::	rc

public recursive subroutine setvmIC(comp, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_GridComp)				::	comp
integer,	intent(out)			::	rc