function YorN = iscolumn(v)
% FUNCTION: ISCOLUMN
%
% SYNOPSIS: YORN = ISCOLUMN(V)
%
% DESCRIPTION: Returns a 1 if V is a column vector and 
%              0 otherwise. 
%

% AUTHOR: Neil Getz
% DATE: 5-18-92
%
% COPYRIGHT 1992, Neil Getz
%
[lenv,widv] = size(v);
if((lenv>=1)&(widv ==1)),
  YorN = 1;
else,
  YorN = 0;
end