% function [indv,err] = getiv(mat)
%
%   Returns the INDEPENDENT VARIABLE values of the 
%   VARYING matrix MAT. The INDEPENDENT VARIABLE is 
%   returned as a column vector, and ERR = 0. If MAT 
%   is not a VARYING matrix, then INDV is empty, 
%   and ERR = 1.
%     
%   See also: INDVCMP, SORT, SORTIV, TACKON, XTRACT, and XTRACTI

function [indv,err] = getiv(mat)
  if nargin <1
    disp('usage: [indv,err] = getiv(mat)');
    return
  end
  err = 0;
  [type,rows,cols,num] = minfo(mat);
  if type == 'vary'
    indv = mat(1:num,cols+1);
  else
    indv = [];
    err = 1;
  end
%
% Copyright MUSYN INC 1991,  All Rights Reserved
