From cc28aa5aa94817b24aea033cc19c1792e5927459 Mon Sep 17 00:00:00 2001
From: "Jun.Wang" <Jun.Wang@noaa.gov>
Date: Tue, 5 Nov 2019 15:37:56 +0000
Subject: [PATCH] restart reproducibility fix for regional fv3

---
 model/fv_regional_bc.F90 | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/model/fv_regional_bc.F90 b/model/fv_regional_bc.F90
index 8b6d11db8c..67d207c592 100644
--- 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.
 !-----------------------------------------------------------------------
 !