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

Removed duplicate code and fixed doc in timed_action.

function b=pad1s(n,a), b=[a ones(1,n-length(a))];
% pad1s - pad a size vector with 1s till it is a given length
%
% pad1s :: E:natural, [[1,D]] -> [[1,E]].
% 
% Note, pad1s has no effect if vector is already longer than n.