timer

Simple timer. Holds start-time, stop-time, and time-difference. More...

Public Member Functions
procedure	start (t)
	start time
procedure	stop (t)
	stop time
procedure	show (t, unit)
	Show time.
generic	operator (t1, t2)
	add times
generic	operator (t1, val)
	divide time in intervals
generic	assignment (t, val)
	assign int to time
generic	assignment (t, t1)
	Assign a time.

Public Attributes
integer, dimension(7)	start_date
	Start date.
integer, dimension(7)	stop_date
	Stop date.
integer, dimension(7)	date_elapsed
	Date-difference between start and stop.
real(dp), public	elapsed
	Elapsed time (in seconds)

Detailed Description

Simple timer. Holds start-time, stop-time, and time-difference.

Member Function/Subroutine Documentation

assignment() [1/2]

generic assignment	(	class(timer), intent(out)	t,
		type(timer), intent(in)	t1 )

Assign a time.

Parameters

[out]	t	New time
[in]	t1	Original time

assignment() [2/2]

generic assignment	(	class(timer), intent(out)	t,
		integer, intent(in)	val )

assign int to time

Parameters

[out]	t	Time
[in]	val	integer time

References basic::is_inf(), basic::nf_inf, basic::nf_minf, and basic::print_msg().

Here is the call graph for this function:

operator() [1/2]

generic operator	(	class(timer), intent(in)	t1,
		class(timer), intent(in)	t2 )

add times

Parameters

[in]	t1	first time interval
[in]	t2	second time interval

Returns

Resulting time

operator() [2/2]

generic operator	(	class(timer), intent(in)	t1,
		integer, intent(in)	val )

divide time in intervals

Parameters

[in]	t1	Time
[in]	val	integer

Returns

Resulting time

show()

procedure show	(	class(timer), intent(in)	t,
		integer, optional	unit )

Show time.

Parameters

[in]	t	Timer
	unit	unit to output

start()

procedure start

(

class(timer), intent(out)

t

)

start time

Parameters

[out]

t

Timer

stop()

procedure stop

(

class(timer), intent(inout)

t

)

stop time

Parameters

[in,out]

t

Timer

---

The documentation for this type was generated from the following file:

• /home/fiol/Trabajos/fortran/numfor/src/utils/basic.f90