% VEC2COL   Ensures that a variable not has less rows than columnss.
%
%    The most common application of this function is to ensure that a 
%    vector is a column vector.
%
% FORMAT   v = vec2col(v)
%        
% OUT   v   A variable of any type.
% IN    v   The variable possible transposed.

% 1993        Created by Patrick Eriksson. 
% 2002-12-10  Adapted to Atmlab from arts/ami.
% 2013-03-04  Bugfix by Gerrit Holl for empty vector + do not get conj

function v = vec2col(v)

wid = ['atmlab:' mfilename ':zero'];
[rows,cols] = size(v);

if all(size(v)==0)
    warning(wid, 'Cannot convert zero-sized vector to column');
end

if (isempty(v) && ~iscolumn(v)) || (~isempty(v) && cols > rows)
    v = v.';
end
end