fix bug in previous commit (keywords/optional arguments) (GEOS_CatchG…

…ridcomp.F90)
GEOS-ESM · Oct 4, 2023 · 9e8ad9a · 9e8ad9a
1 parent 754300a
commit 9e8ad9a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/...GridComp/GEOSsurface_GridComp/GEOSland_GridComp/GEOScatch_GridComp/GEOS_CatchGridComp.F90 b/...GridComp/GEOSsurface_GridComp/GEOSland_GridComp/GEOScatch_GridComp/GEOS_CatchGridComp.F90
@@ -5546,7 +5546,7 @@ subroutine Driver ( RC )
              QA1_0=QA1_0, QA2_0=QA2_0, QA4_0=QA4_0                ,&
              RCONSTIT=RCONSTIT, RMELT=RMELT, TOTDEPOS=TOTDEPOS    ,&
              LHACC=LHACC                                          ,&
-             MLTWTRTMP=mltwtrout, PREOUTTMP=preout, ficesout=ficesout)
+             MLTWTROUT=mltwtrtmp, PREOUT=preouttmp, FICESOUT=ficesout)
 
         end if