∀ n, leibniz (invert_permut n) (filter_nat_type invert_permut_body n)

Theorem eq_invert_permut : forall (n:nat.nat), leibniz.leibniz ((nat.nat -> nat.nat) -> nat.nat -> nat.nat) (invert_permut n) (nat.filter_nat_type ((nat.nat -> nat.nat) -> nat.nat -> nat.nat) invert_permut_body n).

theorem eq_invert_permut : \forall (n:nat). (leibniz) ((nat -> nat) -> nat -> nat) ((invert_permut) n) ((filter_nat_type) ((nat -> nat) -> nat -> nat) (invert_permut_body) n).

theorem eq_invert_permut : forall (n:nat.nat) , (((leibniz.leibniz) (((nat.nat) -> nat.nat) -> (nat.nat) -> nat.nat)) (((permutation.invert_permut) ) (n))) ((((nat.filter_nat_type) (((nat.nat) -> nat.nat) -> (nat.nat) -> nat.nat)) ((permutation.invert_permut_body) )) (n)).

eq_invert_permut : LEMMA (FORALL(n:nat_sttfa_th.sttfa_nat):leibniz_sttfa_th.leibniz[[[nat_sttfa_th.sttfa_nat -> nat_sttfa_th.sttfa_nat] -> [nat_sttfa_th.sttfa_nat -> nat_sttfa_th.sttfa_nat]]](permutation_sttfa.invert_permut(n))(nat_sttfa_th.filter_nat_type[[[nat_sttfa_th.sttfa_nat -> nat_sttfa_th.sttfa_nat] -> [nat_sttfa_th.sttfa_nat -> nat_sttfa_th.sttfa_nat]]](permutation_sttfa.invert_permut_body)(n)))

Printing for OpenTheory is not working at the moment.