Exercise. Definitions, Datatypes, Induction, Functions › [isa-001T]

definition twice :: ‹('a ⇒ 'a) ⇒ 'a ⇒ 'a› where ‹twice f x = f (f x)› lemma ‹rpt (twice f) n (f (x::oot)) = f x›