forlab_time Module


Uses

Used by


Contents


Interfaces

public interface datenum

  • private module function datenum0(year, month, day, hour, minute, second, microsecond)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(in) :: year
    integer, intent(in) :: month
    integer, intent(in) :: day
    integer, intent(in), optional :: hour
    integer, intent(in), optional :: minute
    integer, intent(in), optional :: second
    integer, intent(in), optional :: microsecond

    Return Value real(kind=dp)

public interface is_leap

  • private function is_leap_int8(year) result(is_leap)

    Arguments

    Type IntentOptional AttributesName
    integer(kind=int8), intent(in) :: year

    Return Value logical

  • private function is_leap_int16(year) result(is_leap)

    Arguments

    Type IntentOptional AttributesName
    integer(kind=int16), intent(in) :: year

    Return Value logical

  • private function is_leap_int32(year) result(is_leap)

    Arguments

    Type IntentOptional AttributesName
    integer(kind=int32), intent(in) :: year

    Return Value logical

  • private function is_leap_int64(year) result(is_leap)

    Arguments

    Type IntentOptional AttributesName
    integer(kind=int64), intent(in) :: year

    Return Value logical

interface

  • public module module subroutine tic()

    Arguments

    None

public interface toc

  • private module subroutine toc_default()

    Arguments

    None
  • private module subroutine toc_dp(time)

    Arguments

    Type IntentOptional AttributesName
    real(kind=dp), intent(out) :: time
  • private module subroutine toc_sp(time)

    Arguments

    Type IntentOptional AttributesName
    real(kind=sp), intent(out) :: time

Functions

public function time_string()

Arguments

None

Return Value character(len=19)