view sequences/seq2cell.m @ 61:eff6bddf82e3 tip

Finally implemented perceptual brightness thing.

function Y=seq2cell(X)
% seq2cell - gather elements of sequence into a cell array
%
% seq2cell :: seq A -> {[N]->A}.

Y={};
while ~isempty(X)
	Y=[Y {head(X)}];
	X=next(X);
end