∀ n, leibniz (times_body (n+1)) (λm. m + (n × m))

Theorem eq_times_body_S : forall (n:nat), leibniz.leibniz (nat -> nat) (times_body (S n)) (fun (m:nat) => plus m (times n m)).

theorem eq_times_body_S : \forall (n:nat). (leibniz) (nat -> nat) ((times_body) ((S) n)) (\lambda m : nat. (plus) m ((times) n m)).

theorem eq_times_body_S : forall (n:nat.nat) , (((leibniz.leibniz) ((nat.nat) -> nat.nat)) (((nat.times_body) ) (((nat.S) ) (n)))) (fun (m : nat.nat) , (((nat.plus) ) (m)) ((((nat.times) ) (n)) (m))).

eq_times_body_S : LEMMA (FORALL(n:nat_sttfa.sttfa_nat):leibniz_sttfa_th.leibniz[[nat_sttfa.sttfa_nat -> nat_sttfa.sttfa_nat]](nat_sttfa.times_body(nat_sttfa.sttfa_S(n)))((LAMBDA(m:nat_sttfa.sttfa_nat):nat_sttfa.plus(m)(nat_sttfa.times(n)(m)))))

Printing for OpenTheory is not working at the moment.