hsc3-lang-0.7: Help/Pattern/prsd.help.lhs
prsd :: (Eq a) => P a -> P a Remove successive duplicates. > import Sound.SC3.Lang.Pattern > let p = pfix 0 (prand [1,2,3] 9) > in evalP 0 (pzip (prsd p) p)
prsd :: (Eq a) => P a -> P a Remove successive duplicates. > import Sound.SC3.Lang.Pattern > let p = pfix 0 (prand [1,2,3] 9) > in evalP 0 (pzip (prsd p) p)