fixed warnings in ncdf_tests.F90

rfiorella · Jun 25, 2019 · c287ae7 · c287ae7
1 parent 393c5da
commit c287ae7
Showing 1 changed file with 0 additions and 5 deletions.
diff --git a/tests/unit/ncdf_tests.F90 b/tests/unit/ncdf_tests.F90
@@ -268,7 +268,6 @@ Subroutine test_nc4(test_id, err_msg)
     ! Local Vars
     character(len=str_len) :: filename
     integer                :: iotype, ret_val
-    integer                :: ret_val1
 
     ! Data used to test writing
     integer,          dimension(2) :: data_to_write, compdof
@@ -283,10 +282,6 @@ Subroutine test_nc4(test_id, err_msg)
     integer :: deflate
     integer :: my_deflate_level, deflate_level, deflate_level_2
 
-    ! These will be used to test the chunksizes for netCDF-4 files.
-    integer :: storage
-    integer, dimension(1) :: chunksizes
-
     ! These will be used to set chunk cache sizes in netCDF-4/HDF5
     ! files.
     integer(kind=PIO_OFFSET_KIND) :: chunk_cache_size