From 1aaf72018369a5866d9b648622c0708e3879d6f5 Mon Sep 17 00:00:00 2001 From: Shahram Najm Date: Wed, 23 Aug 2023 19:19:30 +0100 Subject: [PATCH] Remove unused variable --- examples/F90/get_native_type.f90 | 1 - 1 file changed, 1 deletion(-) diff --git a/examples/F90/get_native_type.f90 b/examples/F90/get_native_type.f90 index 66a66f9e5..2bc547b2d 100644 --- a/examples/F90/get_native_type.f90 +++ b/examples/F90/get_native_type.f90 @@ -9,7 +9,6 @@ program get_native_type use eccodes implicit none - integer :: iret integer :: ihandle integer :: ktype = CODES_TYPE_UNDEFINED