ESMF_BaseTimeMod Module

Uses

- ESMF_BaseMod

Interfaces

public interface operator(+)

private function ESMF_BaseTimeSum(basetime1, basetime2)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_BaseTime),	intent(in)			::	basetime1
type(ESMF_BaseTime),	intent(in)			::	basetime2

Return Value type(ESMF_BaseTime)

public interface operator(-)

private function ESMF_BaseTimeDifference(basetime1, basetime2)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_BaseTime),	intent(in)			::	basetime1
type(ESMF_BaseTime),	intent(in)			::	basetime2

Return Value type(ESMF_BaseTime)

public interface operator(/)

private function ESMF_BaseTimeQuotI(basetime, divisor)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_BaseTime),	intent(in)			::	basetime
integer,	intent(in)			::	divisor

Return Value type(ESMF_BaseTime)

private function ESMF_BaseTimeQuotI8(basetime, divisor)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_BaseTime),	intent(in)			::	basetime
integer(kind=ESMF_KIND_I8),	intent(in)			::	divisor

Return Value type(ESMF_BaseTime)

public interface operator(.EQ.)

private function ESMF_BaseTimeEQ(basetime1, basetime2)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_BaseTime),	intent(in)			::	basetime1
type(ESMF_BaseTime),	intent(in)			::	basetime2

Return Value logical

public interface operator(.NE.)

private function ESMF_BaseTimeNE(basetime1, basetime2)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_BaseTime),	intent(in)			::	basetime1
type(ESMF_BaseTime),	intent(in)			::	basetime2

Return Value logical

public interface operator(.LT.)

private function ESMF_BaseTimeLT(basetime1, basetime2)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_BaseTime),	intent(in)			::	basetime1
type(ESMF_BaseTime),	intent(in)			::	basetime2

Return Value logical

public interface operator(.GT.)

private function ESMF_BaseTimeGT(basetime1, basetime2)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_BaseTime),	intent(in)			::	basetime1
type(ESMF_BaseTime),	intent(in)			::	basetime2

Return Value logical

public interface operator(.LE.)

private function ESMF_BaseTimeLE(basetime1, basetime2)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_BaseTime),	intent(in)			::	basetime1
type(ESMF_BaseTime),	intent(in)			::	basetime2

Return Value logical

public interface operator(.GE.)

private function ESMF_BaseTimeGE(basetime1, basetime2)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_BaseTime),	intent(in)			::	basetime1
type(ESMF_BaseTime),	intent(in)			::	basetime2

Return Value logical

Derived Types

type, public :: ESMF_BaseTime

Components

Type	Visibility	Attributes		Name		Initial
integer(kind=ESMF_KIND_I8),	public		::	S
integer(kind=ESMF_KIND_I8),	public		::	Sn
integer(kind=ESMF_KIND_I8),	public		::	Sd

Subroutines

public subroutine normalize_basetime(basetime)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_BaseTime),	intent(inout)			::	basetime

public subroutine seccmp(S1, Sn1, Sd1, S2, Sn2, Sd2, retval)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ESMF_KIND_I8),	intent(in)			::	S1
integer(kind=ESMF_KIND_I8),	intent(in)			::	Sn1
integer(kind=ESMF_KIND_I8),	intent(in)			::	Sd1
integer(kind=ESMF_KIND_I8),	intent(in)			::	S2
integer(kind=ESMF_KIND_I8),	intent(in)			::	Sn2
integer(kind=ESMF_KIND_I8),	intent(in)			::	Sd2
integer,	intent(out)			::	retval