From 3b739848e77e781ba6389f99b6de7e2c428ddcc8 Mon Sep 17 00:00:00 2001
From: Kyle Gerheiser <3209794+kgerheiser@users.noreply.github.com>
Date: Tue, 7 Sep 2021 16:01:47 -0400
Subject: [PATCH] Don't regenerate grib index every time

Fix #104

There is a large performance penalty in re-generating the index every time.
---
 src/getidx.f | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/src/getidx.f b/src/getidx.f
index cad896b7..5c6e9074 100644
--- a/src/getidx.f
+++ b/src/getidx.f
@@ -98,10 +98,6 @@ END SUBROUTINE GETG2IR
          LUX=0
       ENDIF
 
-      IF (ASSOCIATED(IDXLIST(LUGB)%CBUF)) then
-         DEALLOCATE(IDXLIST(LUGB)%CBUF)
-      end if
-
       IF (LUGI.LT.0) THEN      ! Force re-read of index from indexfile
                                ! associated with unit abs(lugi)
          IF ( ASSOCIATED( IDXLIST(LUGB)%CBUF ) )