[cig-commits] [commit] master: more detailed error msg (8235c06)

[cig_noreply at geodynamics.org]

Repository : https://github.com/geodynamics/axisem

On branch  : master
Link       : https://github.com/geodynamics/axisem/compare/49cf2d34d650ddeadc90951f0a3884d9dc5aff2e...0487a1a65c9a4ff020c97672b15153d9ab7736fb

>---------------------------------------------------------------

commit 8235c0682903df6485fe926956ed594d3f00865f
Author: martinvandriel <vandriel at erdw.ethz.ch>
Date:   Fri Sep 26 15:47:15 2014 +0200

    more detailed error msg


>---------------------------------------------------------------

8235c0682903df6485fe926956ed594d3f00865f
 MESHER/pdb.f90 | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/MESHER/pdb.f90 b/MESHER/pdb.f90
index d1fbc02..e3a1492 100644
--- a/MESHER/pdb.f90
+++ b/MESHER/pdb.f90
@@ -1122,7 +1122,8 @@ subroutine partition_sflobal_index
                  enddo
                  if (inbr > 8) then
                     write(6,*) 'ERORR: having more then 8 neighbours (+myself)'
-                    write(6,*) '       check mesh decomposition)'
+                    write(6,*) '       check mesh decomposition in the solid)'
+                    write(6,*) '       iproct = ', iproct
                     stop
                  endif
                  if (myneighbours_solid(iproct,inbr) == -1) myneighbours_solid(iproct,inbr) = ipdes
@@ -1445,7 +1446,8 @@ subroutine partition_sflobal_index
                     enddo
                     if (inbr > 8) then
                        write(6,*) 'ERORR: having more then 8 neighbours (+myself)'
-                       write(6,*) '       check mesh decomposition)'
+                       write(6,*) '       check mesh decomposition in the fluid)'
+                       write(6,*) '       iproct = ', iproct
                        stop
                     endif
                     if (myneighbours_fluid(iproct,inbr) == -1) myneighbours_fluid(iproct,inbr) = ipdes