Merge branch 'NOAA-EMC:develop' into feature/hafs_enkf_merge

hafs-community · Jan 4, 2024 · 2b50089 · 2b50089
2 parents 45e3e6c + 275ee0d
commit 2b50089
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/gsi/setuprad.f90 b/src/gsi/setuprad.f90
@@ -1801,6 +1801,7 @@ subroutine setuprad(obsLL,odiagLL,lunin,mype,aivals,stats,nchanl,nreal,nobs,&
         diagadd=zero
         account_for_corr_obs = .false.
         varinv0=zero
+        raterr2 = zero
 !$omp parallel do  schedule(dynamic,1) private(ii,m,k,asum)
         do ii=1,nchanl
            m=ich(ii)