From 4d009a59425e54ea3c9a6b030bf604243f808899 Mon Sep 17 00:00:00 2001
From: Edward Hartnett <38856240+edwardhartnett@users.noreply.github.com>
Date: Wed, 29 May 2024 04:27:59 +0200
Subject: [PATCH] fixed version problem (#340)

---
 src/tocgrib2super/tocgrib2super.F90 | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/tocgrib2super/tocgrib2super.F90 b/src/tocgrib2super/tocgrib2super.F90
index d6a78d4..d20566a 100755
--- a/src/tocgrib2super/tocgrib2super.F90
+++ b/src/tocgrib2super/tocgrib2super.F90
@@ -232,6 +232,7 @@ end subroutine getgb2p2
      !
      !        Read and return packed GRIB field
      !
+     idxver = 2
      CALL GETGB2P2(lugb,lugi,jrew,DSCPL,IDS,PDTN,PDT, &
           GDTN,GDT,extract,idxver,KREW,gribm,itot8,iret)
      itot = int(itot8, kind(4))