Change handling of no-context in DESC for remap-coarse

2026-10-20 12:52:14 +00:00 · 2020-05-26 09:31:06 +02:00
parent 2de1202d62
commit 90493218a2
3 changed files with 28 additions and 16 deletions
@@ -563,7 +563,10 @@ contains
        call mpi_comm_size(ictxt,np,info) 
        if (info /= mpi_success) np = -1 
        call mpi_comm_rank(ictxt,iam,info) 
-        if (info /= mpi_success) iam = -1 
+        if (info /= mpi_success) iam = -1
+      else
+        np  = -1
+        iam = -1
      end if
      lctxt = ictxt
      lam   = iam