From 6dca839ef7e4e391ee798afffc014e4c9b84187b Mon Sep 17 00:00:00 2001 From: David Huber Date: Fri, 19 May 2023 14:26:24 -0500 Subject: [PATCH] Decrease radar memory footprint. #471 --- src/gsi/read_radar.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/gsi/read_radar.f90 b/src/gsi/read_radar.f90 index 8e5de5aff9..40c77a7ee2 100644 --- a/src/gsi/read_radar.f90 +++ b/src/gsi/read_radar.f90 @@ -341,7 +341,7 @@ subroutine read_radar(nread,ndata,nodata,infile,lunout,obstype,twind,sis,hgtl_fu if (.not.lexist1 .and. .not.lexist2 .and. .not.lexist3) return eradkm=rearth*0.001_r_kind - maxobs=2e8 + maxobs=4e6 nreal=maxdat nchanl=0 ilon=2