GJOIN: Fix mcdel call

tokusanya · Jul 16, 2024 · 796db44 · 796db44
1 parent 64c4280
commit 796db44
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/packages/seacas/applications/gjoin/gjoin.f b/packages/seacas/applications/gjoin/gjoin.f
@@ -567,7 +567,7 @@ PROGRAM GJOIN2
          CALL MDDEL ('NNNPO')
          CALL MDDEL ('ISCR')
          call mddel ('nodscr')
-         call mddel ('NAMSCR')
+         call mcdel ('NAMSCR')
 
 C      --Squeeze the nodal point sets