1interface Profiler_start
3 character (len=*), intent(in) :: name
11interface Profiler_stop
13 character (len=*), intent(in) :: name
subroutine Profiler_startName(name)
subroutine Profiler_startId(id)
subroutine Profiler_stopName(name)
subroutine Profiler_stopId(id)