updates for handling forcing outputs in ladas cycling

modified: src/Applications/GEOSdas_App/GEOSdas.csm modified: src/Applications/GEOSdas_App/fvpsas
GEOS-ESM · Oct 18, 2023 · 79248ed · 79248ed
1 parent 0a2e5d8
commit 79248ed
Show file tree

Hide file tree

Showing 2 changed files with 29 additions and 4 deletions.
diff --git a/src/Applications/GEOSdas_App/GEOSdas.csm b/src/Applications/GEOSdas_App/GEOSdas.csm
@@ -140,6 +140,7 @@
   if ( !($?IGNORE_0) )            setenv IGNORE_0      0
   if ( !($?INITTAG) )             setenv INITTAG       0
   if ( !($?LDAS_ANA) )            setenv LDAS_ANA      0
+  if ( !($?LDHOME) )              setenv LDHOME        none
   if ( !($?LOCAL_ACQUIRE) )       setenv LOCAL_ACQUIRE 0
   if ( !($?MAP05RST) )            setenv MAP05RST      0
   if ( !($?MKRESRST ) )           setenv MKRESRST      0
@@ -5866,10 +5867,10 @@ endif
 
             # hold lfo files for the next segment of ldas coupling
             #----------------------------------------------------------
-            if ( $LDAS_ANA ) then
-               mkdir -p              $FVHOME/recycle/holdforc
-               /bin/cp  *2d_lfo*nc4  $FVHOME/recycle/holdforc/
-            endif
+            #if ( $LDAS_ANA ) then
+               mkdir -p              $FVHOME/lana//holdforc
+               /bin/cp  $FVHOME/recycle/holdpredout/*2d_lfo*nc4  $FVHOME/lana/holdforc/
+            #endif
 
             # local copy to be moved by pesto, 2nd copy to be dealt w/ by recycle
             #--------------------------------------------------------------------
@@ -6076,6 +6077,22 @@ endif
 \end
 
 #.............................................................................
+# -----------------------------------
+  Sub MovePredictorOutput_( )
+#------------------------------------ 
+
+  if ( $LDAS_ANA ) then
+    mkdir -p               $FVHOME/recycle/holdpredout 
+    /bin/mv -f $FVWORK/*lfo_Nx+-* $FVHOME/recycle/holdpredout/. 
+    /bin/cp $FVHOME/recycle/holdpredout/*lfo_Nx+-*  $LDHOME/input/met_forcing/. 
+  endif 
+
+  exit 0                      
+                              # Last line of MovePredictorOutput_()
+
+\end
+
+#............................................................................. 
 
 # ------------------------------------
   Sub AbnormalExit_( _exitcode )

diff --git a/src/Applications/GEOSdas_App/fvpsas b/src/Applications/GEOSdas_App/fvpsas
@@ -530,6 +530,14 @@
          Call SplitExecGcmRun_( 1 )
                                                        zeit_co.x RunGcm
 
+#        Save predictor forcings for ldas coupling 
+#----------------------------------------------------
+         if ( $LDAS_ANA ) then
+                                                      zeit_ci.x MovePrecitorOutput
+            Call MovePredictorOutput_() 
+                                                      zeit_co.x MovePrecitorOutput
+         endif 
+
 #        Save desired restarts for future forecasts
 #        ------------------------------------------
                                                        zeit_ci.x SaveRstForFcst