view general/arrutils/rotl.m @ 6:0ce3c2070089

Removed duplicate code and fixed doc in timed_action.

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]);