samer@30: % skin - Change textual representation of sequence
samer@30: %
samer@30: % skin :: seq(A), (seq(A)->string) -> seq(A).
samer@30: function y=skin(s,strfn), 
samer@36: 	if isempty(s), y=nil; else y=seq.skinner(s,strfn); end
samer@30: end