SUBROUTINE cuda_nvtx_range_pop()
#if defined( __CUDA_PROFILING )
INTEGER :: level
level = cuda_nvtx_range_pop_dc()
#else
DBCSR_ABORT("cuda_nvtx_range_push: __CUDA_PROFILING not compiled in.")
#endif
END SUBROUTINE cuda_nvtx_range_pop