print_timings Subroutine

public subroutine print_timings(this)

Print measured timings of function calls

Arguments

TypeIntentOptionalAttributesName
class(mimic_timer), intent(inout) :: this

Contents

Source Code


Source Code

subroutine print_timings(this)

    class(mimic_timer), intent(inout) :: this

    integer :: i
    integer :: hierarchy_level = 0

    if (associated(this%entries)) then
        do i = 1, this%num_entries
            call this%entries(i)%print(hierarchy_level)
        end do
    endif

end subroutine print_timings