∀ n, leibniz (plus_body (n+1)) (λm. (n + m)+1)

Theorem eq_plus_body_S : forall (n:nat), leibniz.leibniz (nat -> nat) (plus_body (S n)) (fun (m:nat) => S (plus n m)).

theorem eq_plus_body_S : \forall (n:nat). (leibniz) (nat -> nat) ((plus_body) ((S) n)) (\lambda m : nat. (S) ((plus) n m)).

theorem eq_plus_body_S : forall (n:nat.nat) , (((leibniz.leibniz) ((nat.nat) -> nat.nat)) (((nat.plus_body) ) (((nat.S) ) (n)))) (fun (m : nat.nat) , ((nat.S) ) ((((nat.plus) ) (n)) (m))).

eq_plus_body_S : LEMMA (FORALL(n:nat_sttfa.sttfa_nat):leibniz_sttfa_th.leibniz[[nat_sttfa.sttfa_nat -> nat_sttfa.sttfa_nat]](nat_sttfa.plus_body(nat_sttfa.sttfa_S(n)))((LAMBDA(m:nat_sttfa.sttfa_nat):nat_sttfa.sttfa_S(nat_sttfa.plus(n)(m)))))

Printing for OpenTheory is not working at the moment.