fix previous commit

MITgcm · Jan 2, 2022 · 28566e3 · 28566e3
1 parent d1cea20
commit 28566e3
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/pkg/ctrl/ctrl_unpack.F b/pkg/ctrl/ctrl_unpack.F
@@ -95,6 +95,10 @@ subroutine ctrl_unpack( first, mythid )
       integer nwettmp(Nr)
       character*( 9) mskNameForSetUnpack
 #endif
+#if ( defined ALLOW_OBCS || defined ECCO_CTRL_DEPRECATED || \
+      defined ALLOW_GENARR3D_CONTROL || defined ALLOW_GENTIM2D_CONTROL )
+      character*(80) weighttype
+#endif
 
 #ifdef ECCO_CTRL_DEPRECATED
       character*( 80)   fname_theta(3)
@@ -142,9 +146,6 @@ subroutine ctrl_unpack( first, mythid )
       character*( 80)   fname_shifwflx(3)
 #endif /* ECCO_CTRL_DEPRECATED */
 
-#if (defined ALLOW_OBCS || defined ECCO_CTRL_DEPRECATED)
-      character*(80) weighttype
-#endif
 #if (defined (ALLOW_CTRL) && defined (ALLOW_OBCS))
       character*(80) fname_obcsn(3)
       character*(80) fname_obcss(3)