tic Subroutine

public subroutine tic(self)

Type Bound

Arguments

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

Contents

Source Code

tic

Source Code

    subroutine tic(self)
        class(timer), intent(out) :: self
        call system_clock(self%seed)
    end subroutine tic