From 443ef49ab6dc6deb67f4cf7fe31d9cc40a64fa35 Mon Sep 17 00:00:00 2001 From: "H. Joe Lee" Date: Fri, 28 Apr 2023 11:08:59 -0500 Subject: Remove unused variable warning (#2828) Polaris FORTRAN compiler reported the unused variable warning. --- fortran/test/tH5T_F03.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/fortran/test/tH5T_F03.F90 b/fortran/test/tH5T_F03.F90 index 2256b50..86e49b6 100644 --- a/fortran/test/tH5T_F03.F90 +++ b/fortran/test/tH5T_F03.F90 @@ -1374,7 +1374,7 @@ SUBROUTINE t_enum(total_error) INTEGER(SIZE_T) , PARAMETER :: NAME_BUF_SIZE = 16 ! Enumerated type - INTEGER, PARAMETER :: SOLID=0, LIQUID=1, GAS=2, PLASMA=3 + INTEGER, PARAMETER :: SOLID=0, PLASMA=3 INTEGER(HID_T) :: file, filetype, memtype, space, dset ! Handles -- cgit v0.12