From 85d0af22df2842c92cde53c7428f608e697a2517 Mon Sep 17 00:00:00 2001 From: ClaraDraper-NOAA Date: Wed, 30 Oct 2024 15:11:09 +0000 Subject: [PATCH] Tidy up comments. --- src/enkf/controlvec.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/enkf/controlvec.f90 b/src/enkf/controlvec.f90 index 9de68e96c..d6aba5b1e 100644 --- a/src/enkf/controlvec.f90 +++ b/src/enkf/controlvec.f90 @@ -337,7 +337,7 @@ subroutine write_control(no_inflate_flag) else call writegriddata(0,0,cvars3d,cvars2d,nc3d,nc2d,clevels,ncdim,grdin_mean,no_inflate_flag) end if - elseif (nc2d>0) then ! always write sfc mean increment + elseif (nc2d>0) then ! always write sfc mean increment for soil analysis no_vars3d='' call writeincrement(0,0,no_vars3d,cvars2d,nc3d,nc2d,clevels,ncdim,grdin_mean,no_inflate_flag) endif