% replicate :: natural, A -> seq(A).
function y=replicate(n,x), y=take(n,repeat(x));
