

Variables a b c d e : Nat.
Variable  f : Nat -> Nat.
Axiom H1 : f a = a.

Theorem T : f (f (f a)) = a
:= calc f (f (f a)) = f (f a) : { H1 }
                ... = f a     : { H1 }
                ... = a       : { H1 }.
