PTEROSOR/QuantumPackage
10
0
Fork 0
mirror of https://github.com/QuantumPackage/qp2.git synced 2024-11-03 20:53:54 +01:00
Code Releases Activity

test intel bug

Browse Source
This commit is contained in:
Yann Damour 2021-11-18 09:19:41 +01:00
parent 924dd3a65b
commit 3d478029e8
2 changed files with 17 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
config/ifort.cfg
View File

@ -9,7 +9,7 @@
FC : ifort -fpic
LAPACK_LIB : -mkl=parallel -lirc -lsvml -limf -lipps
IRPF90 : irpf90
IRPF90_FLAGS : --ninja --align=32 -DINTEL
IRPF90_FLAGS : --ninja --align=32 -DINTEL -DINTEL_CHECK_OMP
# Global options
################

16
src/utils/intel_check_omp.irp.f Normal file
View File

@ -0,0 +1,16 @@
subroutine intel_check_omp()
! Doc : idk
implicit none
IRP_IF INTEL_CHECK_OMP
call omp_set_max_active_levels(5)
print*,'INTEL_CHECK_OMP: true'
IRP_ELSE
call omp_set_nested(.True.)
!call omp_set_nested(.False.)
print*,'INTEL_CHECK_OMP: false'
IRP_ENDIF
end