Declare LIQW as REAL to compile on Intel compiler

NOAA-OWP · Jul 19, 2024 · 4cde7a9 · 4cde7a9
1 parent 38624ce
commit 4cde7a9
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/snow19/updt19.f b/src/snow19/updt19.f
@@ -13,6 +13,7 @@ SUBROUTINE UPDT19(OWE,OSC,TWE,COVER,IUPWE,IUPSC,
 
 CVK        MODIFIED 4/00 BY V. KOREN: TWO NEW STATES ADDED
 C.......................................
+      REAL LIQW
       DIMENSION ADC(11)
 C
 C     COMMON BLOCKS