Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/PreludeList/Replicate.hs
module Prelude where replicate :: Int -> a -> [a] replicate n x = take n (repeat x)