From 420d1da85568258e836cf4460e7c863c52c6a8dc Mon Sep 17 00:00:00 2001 From: AlysonStahl-NOAA <166434581+AlysonStahl-NOAA@users.noreply.github.com> Date: Tue, 3 Dec 2024 09:57:47 -0800 Subject: [PATCH] typo --- tests/test_bitmap.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/test_bitmap.F90 b/tests/test_bitmap.F90 index 13194e01..75b82b4e 100644 --- a/tests/test_bitmap.F90 +++ b/tests/test_bitmap.F90 @@ -19,7 +19,7 @@ program test_bitmap character(len=1), dimension(:), pointer :: cbuf integer :: iret, nnum, nlen, numlocal, numfields - integer :: listsec0(3), listsec1(13) maxvals(7) + integer :: listsec0(3), listsec1(13), maxvals(7) !integer, dimension(*):: igds, igdstmpl, ideflist, ipdstmpl, coordlist, & ! idrstmpl, bmap, fld !integer :: igdslen, idefnum, ipdsnum, ipdslen, numcoord, ndpts, idrsnum, &