tem_getNTimers Function

public pure function tem_getNTimers(me) result(n)

Get the number of timers.

Arguments

Type IntentOptional Attributes Name
type(tem_timer_type), intent(in), optional :: me

timer object

Return Value integer

number of timer handles


Source Code

  pure function tem_getNTimers( me ) result ( n )
    ! -------------------------------------------------------------------- !
    !> timer object
    type(tem_timer_type), intent(in), optional :: me
    !> number of timer handles
    integer :: n
    ! -------------------------------------------------------------------- !

    if ( present(me) ) then
      n = me%nTimers
    else
      n = timer%timedat%nTimers
    end if

  end function tem_getNTimers