ISO8601Duration Derived Type

type, public :: ISO8601Duration


Constructor

public interface ISO8601Duration

  • public function construct_ISO8601Duration(isostring, imin, imax, rc) result(duration)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: isostring
    integer, intent(in) :: imin
    integer, intent(in) :: imax
    integer, intent(out), optional :: rc

    Return Value type(ISO8601Duration)


Type-Bound Procedures

procedure, public :: get_days

  • public function get_days(self)

    Arguments

    Type IntentOptional Attributes Name
    class(ISO8601Duration), intent(in) :: self

    Return Value integer

procedure, public :: get_hours

  • public function get_hours(self)

    Arguments

    Type IntentOptional Attributes Name
    class(ISO8601Duration), intent(in) :: self

    Return Value integer

procedure, public :: get_minutes

  • public function get_minutes(self)

    Arguments

    Type IntentOptional Attributes Name
    class(ISO8601Duration), intent(in) :: self

    Return Value integer

procedure, public :: get_months

  • public function get_months(self)

    Arguments

    Type IntentOptional Attributes Name
    class(ISO8601Duration), intent(in) :: self

    Return Value integer

procedure, public :: get_seconds

  • public function get_seconds(self)

    Arguments

    Type IntentOptional Attributes Name
    class(ISO8601Duration), intent(in) :: self

    Return Value integer

procedure, public :: get_years

  • public function get_years(self)

    Arguments

    Type IntentOptional Attributes Name
    class(ISO8601Duration), intent(in) :: self

    Return Value integer

Source Code

   type :: ISO8601Duration
      private
      integer :: years_
      integer :: months_
      integer :: days_
      integer :: hours_
      integer :: minutes_
      integer :: seconds_
   contains
      procedure, public :: get_years
      procedure, public :: get_months
      procedure, public :: get_days
      procedure, public :: get_hours
      procedure, public :: get_minutes
      procedure, public :: get_seconds
   end type ISO8601Duration