function listvar(hdr,nv)
%
%
%  LISTVAR.M
%
%    Function to display the variables and their locations
%	within the array.
%
%  Written by Andrew Barnard, OSU, 1997.
%

clc

fprintf('\r\n  Var. No	Var. Name	Var. No.	Var. Name\n')

for i=1:2:nv

  if i == nv
    fprintf('      %g	%s\r\n',i,hdr(i,:));
  else
    fprintf('      %g	%s	%g	%s\n',i,hdr(i,:),i+1,hdr(i+1,:))
  end

end