hsc3-lang-0.8: Help/Pattern/Step/ptake.help.lhs

ptake :: P Int -> P a -> P a

> import Sound.SC3.Lang.Pattern.Step

> evalP (ptake 5 (pseq [1,2,3] pinf))

> evalP (ptake 5 (pseq [1,2,3] 1))