Workaround for some memory issues, possibly thread stack sizing

Reduced maximum thread team size for MSK144 candidate discovery to 4.
This commit is contained in:
Bill Somerville 2020-10-07 13:12:20 +01:00
parent a2e8d8927b
commit 6026944e33
No known key found for this signature in database
GPG Key ID: D864B06D1E81618F

View File

@ -57,7 +57,7 @@ subroutine msk144sync(cdat,nframes,ntol,delf,navmask,npeaks,fc,fest, &
xm=0.0 xm=0.0
bf=0.0 bf=0.0
nthreads=1 nthreads=1
!$ nthreads=min(8,int(OMP_GET_MAX_THREADS(),4)) !$ nthreads=min(4,int(OMP_GET_MAX_THREADS(),4))
nstep=nfreqs/nthreads nstep=nfreqs/nthreads
!$OMP PARALLEL NUM_THREADS(nthreads) PRIVATE(id,if1,if2) !$OMP PARALLEL NUM_THREADS(nthreads) PRIVATE(id,if1,if2)