Correct typo in w3srcemd.F90 pre-processor directive. (NOAA-EMC#1039)

hafs-community · Jul 14, 2023 · 02cb72f · 02cb72f
1 parent 4d8c315
commit 02cb72f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/model/src/w3srcemd.F90 b/model/src/w3srcemd.F90
@@ -757,7 +757,7 @@ SUBROUTINE W3SRCE ( srce_call, IT, ISEA, JSEA, IX, IY, IMOD,          &
     REAL :: DTRAW
 #endif
 
-#if defined(W3_IC1) || W3_IC2 || defined(W3_IC3) || defined(W3_IC4) || defined(W3_IC5)
+#if defined(W3_IC1) || defined(W3_IC2) || defined(W3_IC3) || defined(W3_IC4) || defined(W3_IC5)
     REAL :: VSIC(NSPEC), VDIC(NSPEC)
 #endif