From 48ff3cf3606ea63edb0dbbcb50162b9cd8f961a8 Mon Sep 17 00:00:00 2001 From: Rolf Reichle Date: Sun, 15 Oct 2023 08:49:33 -0400 Subject: [PATCH] fix syntax error from previous commit (catchmentCN.F90) --- .../GEOScatchCN_GridComp/Shared/catchmentCN.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/GEOSagcm_GridComp/GEOSphysics_GridComp/GEOSsurface_GridComp/GEOSland_GridComp/GEOScatchCN_GridComp/Shared/catchmentCN.F90 b/GEOSagcm_GridComp/GEOSphysics_GridComp/GEOSsurface_GridComp/GEOSland_GridComp/GEOScatchCN_GridComp/Shared/catchmentCN.F90 index bb51c310a..eea40eb69 100755 --- a/GEOSagcm_GridComp/GEOSphysics_GridComp/GEOSsurface_GridComp/GEOSland_GridComp/GEOScatchCN_GridComp/Shared/catchmentCN.F90 +++ b/GEOSagcm_GridComp/GEOSphysics_GridComp/GEOSsurface_GridComp/GEOSland_GridComp/GEOScatchCN_GridComp/Shared/catchmentCN.F90 @@ -883,7 +883,7 @@ SUBROUTINE CATCHCN ( & EVSN, SHFLS, alhfsn, hcorr, ghfluxsno(n), & ! out sndzsc, wesnprec, sndzprec, sndz1perc, & ! out wesnperc, wesndens, wesnrepar, mltwtr, & ! out - excs, drho0, wesnbot, tksno, dtss, & ! out + excs, drho0, wesnbot, tksno, dtss ) ! out FICESOUT(:,N) = fices