Hi John,
Thank your for your reply.
You are right, I forgot using the #define Nesting option in the *.h project. According to your suggestion, I have used the #define Nesting option and recompiled model, this issue didn't appear again.
However, I got another error like that:
Code: Select all
forrtl: severe (174): SIGSEGV, segmentation fault occurred
Image PC Routine Line Source
coawstM 0000000003C3E9CA Unknown Unknown Unknown
libpthread-2.17.s 00002B5D9CF495D0 Unknown Unknown Unknown
coawstM 0000000000BF42A4 swboun_ 3546 swanpre2.f90
coawstM 0000000000AFE58E swread_ 1851 swanpre1.f90
coawstM 0000000000A823FD swan_initialize_ 332 swanmain.f90
coawstM 0000000000A1EB75 waves_control_mod 94 waves_control.f90
coawstM 000000000041EFFD MAIN__ 360 master.f90
coawstM 0000000000419122 Unknown Unknown Unknown
libc-2.17.so 00002B5D9D67E495 __libc_start_main Unknown Unknown
coawstM 0000000000419029 Unknown Unknown Unknown
Fatal error in MPI_Send: Other MPI error, error stack:
MPI_Send(173)..................: MPI_Send(buf=0x478ff10, count=4, MPI_INTEGER, dest=40, tag=13, comm=0x84000007) failed
MPIDI_EagerContigShortSend(262): failure occurred while attempting to send an eager message
MPIDI_CH3_iStartMsg(36)........: Communication error with rank 40
Fatal error in PMPI_Bcast: Other MPI error, error stack:
PMPI_Bcast(1478)......................: MPI_Bcast(buf=0x478f8c4, count=1, MPI_INTEGER, root=0, comm=0x84000004) failed
MPIR_Bcast_impl(1321).................:
MPIR_Bcast_intra(1119)................:
MPIR_Bcast_scatter_ring_allgather(962):
MPIR_Bcast_binomial(213)..............: Failure during collective
MPIR_Bcast_scatter_ring_allgather(955):
MPIR_Bcast_binomial(145)..............:
dequeue_and_set_error(596)............: Communication error with rank 0
The line 3546 of the swanpre2.f90 program is that:
Code: Select all
IF (OPTG.NE.5) THEN 40.80
IY = CURR%JY 40.31
XC2 = XCGRID(IX,IY)
YC2 = YCGRID(IX,IY)
The line 1851 of the swanpre1.f90 program is:
Code: Select all
CALL SWBOUN ( XGRDGL, YGRDGL, KGRPGL, XYTST, KGRBGL, ng)
the line 332 of the swanmain.f90 program is:
Code: Select all
CALL SWAN_INITIALIZE (ng, ngc, ngp, NUM_SGRIDS, MyCOMM, Wname(ng))
The detail of the log files are attached in the below.
Please help me to solve this problem.
Thank you very much!