3 assert(simp(Iterator.iterate(ONE:Rexp)(r => SEQ(r, ONE | ONE)).drop(50).next) == ONE)

     3 assert(SEQs_smart(Nil) == ONE)

     4 assert(simp(Iterator.iterate(ONE:Rexp)(r => ALT(r, r)).drop(20).next) == ONE)

     4 assert(SEQs_smart(List(ZERO)) == ZERO)

     5 assert(SEQs_smart(List(CHAR('a'))) == CHAR('a'))

     6 assert(SEQs_smart(List(ONE ~ ONE)) == ONE ~ ONE)

     7 assert(SEQs_smart(List(ONE, ONE)) == SEQs(List(ONE, ONE)))

     8 assert(ALTs_smart(Nil) == ZERO)

     9 assert(ALTs_smart(List(ONE ~ ONE)) == ONE ~ ONE)

    10 assert(ALTs_smart(List(ZERO, ZERO)) == ALTs(List(ZERO, ZERO)))