Master: Remove extra declaration of variable, ges_ps_write, in src/gs…

…i/gsi_rfv3io_mod.f90, to allow the code to compile.
RussTreadon-NOAA · Feb 4, 2022 · 2c4f620 · 2c4f620
1 parent 1caf75a
commit 2c4f620
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/src/gsi/gsi_rfv3io_mod.f90 b/src/gsi/gsi_rfv3io_mod.f90
@@ -2075,7 +2075,6 @@ subroutine wrfv3_netcdf(fv3filenamegin)
     real(r_kind), dimension(lat2,lon2,nsig) :: io_arr_qg, io_arr_qnr
     real(r_kind), dimension(:,:,:),allocatable ::g_prsi 
 
-    real(r_kind), dimension(:,:),allocatable ::ges_ps_write
 
     it=ntguessig
     ier=0