∀ n, leibniz (!n) (filter_nat_type fact_body n)

Theorem eq_fact : forall (n:nat.nat), leibniz.leibniz (nat.nat) (fact n) (nat.filter_nat_type (nat.nat) fact_body n).

theorem eq_fact : \forall (n:nat). (leibniz) (nat) ((fact) n) ((filter_nat_type) (nat) (fact_body) n).

theorem eq_fact : forall (n:nat.nat) , (((leibniz.leibniz) (nat.nat)) (((fact.fact) ) (n))) ((((nat.filter_nat_type) (nat.nat)) ((fact.fact_body) )) (n)).

eq_fact : LEMMA (FORALL(n:nat_sttfa_th.sttfa_nat):leibniz_sttfa_th.leibniz[nat_sttfa_th.sttfa_nat](fact_sttfa.sttfa_fact(n))(nat_sttfa_th.filter_nat_type[nat_sttfa_th.sttfa_nat](fact_sttfa.fact_body)(n)))

Printing for OpenTheory is not working at the moment.