print scale factor num mps

SCOREC · Jul 9, 2024 · 420daf8 · 420daf8
1 parent 9bd66a3
commit 420daf8
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/test/testFortranMPAdvection.f90 b/test/testFortranMPAdvection.f90
@@ -74,6 +74,9 @@ program main
     numMPs = numMPs + nEdgesOnCell(i) * mpsScaleFactorPerVtx
   end do
 
+  print *, "Scale Factor", mpsScaleFactorPerVtx
+  print *, "NUM MPs", numMPs
+
   allocate(mpsPerElm(nCells))
   allocate(mp2Elm(numMPs))
   allocate(isMPActive(numMPs))