restart reproducibility fix for regional fv3

LarissaReames-NOAA · Nov 5, 2019 · cc28aa5 · cc28aa5
1 parent 786447c
commit cc28aa5
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/model/fv_regional_bc.F90 b/model/fv_regional_bc.F90
@@ -1183,6 +1183,12 @@ subroutine start_regional_restart(Atm                             &
       endif
 !
 !-----------------------------------------------------------------------
+!***  Get the source of the input data.
+!-----------------------------------------------------------------------
+!
+      call get_data_source(data_source,Atm%flagstruct%regional)
+!
+!-----------------------------------------------------------------------
 !***  Preliminary setup for the forecast.
 !-----------------------------------------------------------------------
 !