Juan 03/01/2023:communication.f90, Bypass MPICRAY MultiGrid problem ,...

Juan 03/01/2023:communication.f90, Bypass MPICRAY MultiGrid problem , mpi_cart_create( reorder=.true. => .false. , to have expected rank number un sub-grid computation

src/ZSOLVER/tensorproductmultigrid_Source/communication.f90

@@ -269,7 +269,7 @@ contains
                          dim_horiz,             & ! horizontal dimension
                          (/2**pproc,2**pproc/), & ! extent in each horizontal direction
                          (/.false.,.false./),   & ! periodic?
-                         .true.,                & ! reorder?
+                         .false.,               & ! reorder?
                          MPI_COMM_HORIZ,        & ! Name of new communicator
                          ierr)
    ! calculate and display rank and corrdinates in cartesian grid