fic paren

NOAA-EMC · Oct 17, 2024 · fe5f1d2 · fe5f1d2
1 parent d7ddda2
commit fe5f1d2
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/gsi/read_prepbufr.f90 b/src/gsi/read_prepbufr.f90
@@ -1922,7 +1922,7 @@ subroutine read_prepbufr(nread,ndata,nodata,infile,obstype,lunout,twindin,sis,&
                     if (t4dv<zero.OR.t4dv>winlen) cycle LOOP_K_LEVS
                  else
                  ! Fix to ensure end of time window is NOT included
-                    if ((real(abs(time)) > real(ctwind(nc)) .or. real(time)==real(three) .or. &
+                    if (real(abs(time)) > real(ctwind(nc)) .or. real(time)==real(three) .or. &
                       real(abs(time)) > real(twindin)) cycle LOOP_K_LEVS ! outside time window
 !                    if (real(abs(time))>real(ctwind(nc)) .or.  real(abs(time))>real(twindin)) cycle LOOP_K_LEVS
                  endif