timer Derived Type

type, public :: timer


Contents

Type-Bound Procedures

Source Code

timer

Type-Bound Procedures

procedure, public, :: nowtime

  • public function nowtime(self) result(t)

    Arguments

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

    Return Value character(len=23)

procedure, public, :: toc

  • public function toc(self)

    Arguments

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

    Return Value real(kind=fffc_real_kind)

procedure, public, :: tic

  • public subroutine tic(self)

    Arguments

    Type IntentOptional Attributes Name
    class(timer), intent(out) :: self

Source Code

    type timer
        integer, private :: seed
    contains
        procedure :: tic, toc, nowtime
    end type timer