Theorem. Definitions, Datatypes, Induction, Functions › compress_replicate lemmas [isa-0027]

lemma compress_replicate_ONE: ‹n > 0 ⟹ compress (replicate n ONE) = ONEs n Empty›

lemma compress_replicate_TWO: ‹n > 0 ⟹ compress (replicate n TWO) = TWOs n Empty›