mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-08-24 21:21:47 +02:00
remove comments
This commit is contained in:
parent
c93938e443
commit
082b32b24f
@ -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
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user