profiler_end Subroutine

public subroutine profiler_end()

Finalise the profiler

Arguments

None

Called by

proc~~profiler_end~~CalledByGraph proc~profiler_end profiler_end proc~driver_run_ocean driver_run_ocean proc~driver_run_ocean->proc~profiler_end proc~driver_run driver_run proc~driver_run->proc~driver_run_ocean

Source Code

   subroutine profiler_end()
      !! Finalise the profiler
      state%initialized = .false.
      state%num_regions = 0
   end subroutine profiler_end