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