ESMF_TimeIntervalMod Module

!!!!!!! added by jhe


Uses


Interfaces

public interface operator(*)

  • private function ESMF_TimeIntervalProdI(timeinterval, multiplier)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_TimeInterval), intent(in) :: timeinterval
    integer, intent(in) :: multiplier

    Return Value type(ESMF_TimeInterval)

  • private function ESMF_TimeIntervalProdI8(timeinterval, multiplier)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_TimeInterval), intent(in) :: timeinterval
    integer(kind=ESMF_KIND_I8), intent(in) :: multiplier

    Return Value type(ESMF_TimeInterval)

public interface operator(/)

  • private function ESMF_TimeIntervalQuotI(timeinterval, divisor)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_TimeInterval), intent(in) :: timeinterval
    integer, intent(in) :: divisor

    Return Value type(ESMF_TimeInterval)

public interface operator(+)

  • private function ESMF_TimeIntervalSum(timeinterval1, timeinterval2)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_TimeInterval), intent(in) :: timeinterval1
    type(ESMF_TimeInterval), intent(in) :: timeinterval2

    Return Value type(ESMF_TimeInterval)

public interface operator(-)

  • private function ESMF_TimeIntervalDiff(timeinterval1, timeinterval2)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_TimeInterval), intent(in) :: timeinterval1
    type(ESMF_TimeInterval), intent(in) :: timeinterval2

    Return Value type(ESMF_TimeInterval)

public interface operator(.EQ.)

  • private function ESMF_TimeIntervalEQ(timeinterval1, timeinterval2)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_TimeInterval), intent(in) :: timeinterval1
    type(ESMF_TimeInterval), intent(in) :: timeinterval2

    Return Value logical

public interface operator(.NE.)

  • private function ESMF_TimeIntervalNE(timeinterval1, timeinterval2)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_TimeInterval), intent(in) :: timeinterval1
    type(ESMF_TimeInterval), intent(in) :: timeinterval2

    Return Value logical

public interface operator(.LT.)

  • private function ESMF_TimeIntervalLT(timeinterval1, timeinterval2)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_TimeInterval), intent(in) :: timeinterval1
    type(ESMF_TimeInterval), intent(in) :: timeinterval2

    Return Value logical

public interface operator(.GT.)

  • private function ESMF_TimeIntervalGT(timeinterval1, timeinterval2)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_TimeInterval), intent(in) :: timeinterval1
    type(ESMF_TimeInterval), intent(in) :: timeinterval2

    Return Value logical

public interface operator(.LE.)

  • private function ESMF_TimeIntervalLE(timeinterval1, timeinterval2)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_TimeInterval), intent(in) :: timeinterval1
    type(ESMF_TimeInterval), intent(in) :: timeinterval2

    Return Value logical

public interface operator(.GE.)

  • private function ESMF_TimeIntervalGE(timeinterval1, timeinterval2)

    Arguments

    Type IntentOptional Attributes Name
    type(ESMF_TimeInterval), intent(in) :: timeinterval1
    type(ESMF_TimeInterval), intent(in) :: timeinterval2

    Return Value logical


Derived Types

type, public ::  ESMF_TimeInterval

Components

Type Visibility Attributes Name Initial
type(ESMF_BaseTime), public :: basetime
integer, public :: YR
integer, public :: MM
logical, public :: starttime_set
type(ESMF_Time), public :: starttime

Functions

public function ESMF_TimeIntervalAbsValue(timeinterval)

Arguments

Type IntentOptional Attributes Name
type(ESMF_TimeInterval), intent(in) :: timeinterval

Return Value type(ESMF_TimeInterval)

public function ESMF_TimeIntervalNegAbsValue(timeinterval)

Arguments

Type IntentOptional Attributes Name
type(ESMF_TimeInterval), intent(in) :: timeinterval

Return Value type(ESMF_TimeInterval)

public function ESMF_TimeIntervalDIVQuot(timeinterval1, timeinterval2)

Arguments

Type IntentOptional Attributes Name
type(ESMF_TimeInterval), intent(in) :: timeinterval1
type(ESMF_TimeInterval), intent(in) :: timeinterval2

Return Value integer

public function ESMF_TimeIntervalIsPositive(timeinterval)

Arguments

Type IntentOptional Attributes Name
type(ESMF_TimeInterval), intent(in) :: timeinterval

Return Value logical


Subroutines

public subroutine ESMF_TimeIntervalGet(timeinterval, StartTimeIn, yy, mm, D, d_r8, S, S_i8, Sn, Sd, TimeString, rc)

Arguments

Type IntentOptional Attributes Name
type(ESMF_TimeInterval), intent(in) :: timeinterval
type(ESMF_Time), intent(in), optional :: StartTimeIn
integer, intent(out), optional :: yy
integer, intent(out), optional :: mm
integer, intent(out), optional :: D
real(kind=ESMF_KIND_R8), intent(out), optional :: d_r8
integer, intent(out), optional :: S
integer(kind=ESMF_KIND_I8), intent(out), optional :: S_i8
integer, intent(out), optional :: Sn
integer, intent(out), optional :: Sd
character(len=*), intent(out), optional :: TimeString
integer, intent(out), optional :: rc

public subroutine ESMF_TimeIntervalSet(timeinterval, YY, MM, D, H, M, S, S_i8, MS, d_, d_r8, Sn, Sd, StartTime, rc)

Arguments

Type IntentOptional Attributes Name
type(ESMF_TimeInterval), intent(out) :: timeinterval
integer, intent(in), optional :: YY
integer, intent(in), optional :: MM
integer, intent(in), optional :: D
integer, intent(in), optional :: H
integer, intent(in), optional :: M
integer, intent(in), optional :: S
integer(kind=ESMF_KIND_I8), intent(in), optional :: S_i8
integer, intent(in), optional :: MS
double precision, intent(in), optional :: d_
double precision, intent(in), optional :: d_r8
integer, intent(in), optional :: Sn
integer, intent(in), optional :: Sd
type(ESMF_Time), intent(in), optional :: StartTime
integer, intent(out), optional :: rc

public subroutine ESMF_TimeIntervalPrint(timeinterval, opts, rc)

Arguments

Type IntentOptional Attributes Name
type(ESMF_TimeInterval), intent(in) :: timeinterval
character(len=*), intent(in), optional :: opts
integer, intent(out), optional :: rc

public subroutine normalize_timeint(timeInt)

Arguments

Type IntentOptional Attributes Name
type(ESMF_TimeInterval), intent(inout) :: timeInt