Skip to content

Commit

Permalink
switched to g2 develop branch everywhere in CI
Browse files Browse the repository at this point in the history
  • Loading branch information
edwardhartnett committed Feb 28, 2024
1 parent 2bfd878 commit b26d367
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/grb2index/grb2index.F90
Original file line number Diff line number Diff line change
Expand Up @@ -18,7 +18,7 @@ program grb2index
integer :: idxver = 1
integer :: lugb = 11, lugi = 12
integer :: ncgb, ncgb1
integer :: iret
integer :: iret, ios, ncbase

! get arguments
narg = iargc()
Expand All @@ -38,7 +38,7 @@ program grb2index
endif

! Open index file for output.
call baopenw(lugi, trim(cg1), ios)
call baopenw(lugi, trim(cgi), ios)
if (ios .ne. 0) then
print *, 'grb2index: Error accessing file ', trim(cgi)
stop 3
Expand Down

0 comments on commit b26d367

Please sign in to comment.