diff --git a/src/utils/set_multiple_levels_omp.irp.f b/src/utils/set_multiple_levels_omp.irp.f index a09f615a..4be3af5b 100644 --- a/src/utils/set_multiple_levels_omp.irp.f +++ b/src/utils/set_multiple_levels_omp.irp.f @@ -5,11 +5,11 @@ subroutine set_multiple_levels_omp() implicit none IRP_IF SET_MAX_ACT - print*,'SET_MAX_ACT: True, call omp_set_max_active_levels(5)' + !print*,'SET_MAX_ACT: True, call omp_set_max_active_levels(5)' call omp_set_max_active_levels(5) IRP_ENDIF IRP_IF SET_NESTED - print*,'SET_NESTED: True, call omp_set_nested(.True.)' + !print*,'SET_NESTED: True, call omp_set_nested(.True.)' call omp_set_nested(.True.) IRP_ENDIF