Remove unused variables

This commit is contained in:
Shahram Najm 2016-10-19 16:46:53 +01:00
parent 1f157c978e
commit 4ef4fba3d3
1 changed files with 0 additions and 2 deletions

View File

@ -25,8 +25,6 @@ program bufr_encode
integer :: ibufrin
integer(kind=4), dimension(:), allocatable :: ivalues
integer, parameter :: max_strsize = 200
character(len=max_strsize) , dimension(:),allocatable :: svalues
real(kind=8), dimension(:), allocatable :: rvalues
character(len=max_strsize) :: infile_name
character(len=max_strsize) :: outfile_name