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

Axiom axiom_fact : forall (n:nat.nat), connectives.equal (nat.nat) (fact n) (nat.filter_nat_type (nat.nat) fact_body n)

axiom axiom_fact : \forall (n:nat). (equal) (nat) ((fact) n) ((filter_nat_type) (nat) (fact_body) n)

axiom axiom_fact : forall (n:nat.nat) , (((connectives.equal) (nat.nat)) (((fact.fact) ) (n))) ((((nat.filter_nat_type) (nat.nat)) ((fact.fact_body) )) (n))

axiom_fact : AXIOM (FORALL(n:nat_sttfa_th.sttfa_nat):connectives_sttfa_th.equal[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.