Remove commented out line.

NOAA-EMC · May 30, 2023 · db1fd2d · db1fd2d
1 parent f8a903e
commit db1fd2d
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/gsi/convthin.f90 b/src/gsi/convthin.f90
@@ -464,8 +464,7 @@ subroutine map3grids_m(flg,pflag,pcoord,nlevp,dlat_earth,dlon_earth,pob,crit1,io
 
     real(r_kind) dlat1,dlon1,pob1
     real(r_kind) dx,dy,dp
-!   real(r_kind) dxx,dyy,dpp
-    real(r_kind) crit!,dist1
+    real(r_kind) crit  !,dist1
 
     logical foreswp, aftswp