view general/arrutils/rotl.m @ 8:f0a3d7d7a0e3

Renamed cat_sep function to catsep

function y=rotl(x,n)
% rotl - rotate columns of array to left
%
% rotl :: [[N,M]] -> [[N,M]].
% rotl :: [[N,M]], natural -> [[N,M]].

if nargin<2, n=1; end
y = x(:,[n+1:size(x,2),1:n]);