fact.sym_eq_fact_body_S
∀ n, leibniz ((!n) × (n+1)) (fact_body (n+1))
Theorem sym_eq_fact_body_S : forall (n:nat.nat), leibniz.leibniz (nat.nat) (nat.times (fact n) (nat.S n)) (fact_body (nat.S n)).
theorem sym_eq_fact_body_S : \forall (n:nat). (leibniz) (nat) ((times) ((fact) n) ((S) n)) ((fact_body) ((S) n)).
theorem sym_eq_fact_body_S : forall (n:nat.nat) , (((leibniz.leibniz) (nat.nat)) ((((nat.times) ) (((fact.fact) ) (n))) (((nat.S) ) (n)))) (((fact.fact_body) ) (((nat.S) ) (n))).
sym_eq_fact_body_S : LEMMA (FORALL(n:nat_sttfa_th.sttfa_nat):leibniz_sttfa_th.leibniz[nat_sttfa_th.sttfa_nat](nat_sttfa_th.times(fact_sttfa.sttfa_fact(n))(nat_sttfa_th.sttfa_S(n)))(fact_sttfa.fact_body(nat_sttfa_th.sttfa_S(n))))
Printing for OpenTheory is not working at the moment.