Commit 1eebfd64 authored by Vigeesh Gangadharan's avatar Vigeesh Gangadharan
Browse files

try barrier

parent 6587c331
Pipeline #3103 passed with stage
in 3 minutes and 10 seconds
......@@ -241,6 +241,7 @@ PROGRAM VFISV_SPEC
IF (STRAYCASE /= 0) DEALLOCATE(STRAY)
DEALLOCATE(SFIT,SIFIT,SQFIT,SUFIT,SVFIT)
PRINT*,'Disconnecting.1'
CALL MPI_BARRIER(intracomm)
CALL MPI_COMM_DISCONNECT(intracomm, ierr)
PRINT*,'Disconnecting.2'
CALL MPI_COMM_DISCONNECT(intercomm, ierr)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment