| |
| | cardinality |
 | | (def-theorem equinumerous-is-symmetric "forall(a:sets[ind_1],b:sets[ind_2], (a equinumerous b) implies (b equinumerous a))" (theory pure-generic-theory-2) (usages transportable-macete) (proof (direct-and-antecedent-inference-strategy (instantiate-existential ("inverse{f}")) insistent-direct-inference-strategy (apply-macete-with-minor-premises dom-of-inverse) (apply-macete-with-minor-premises injective-iff-injective-on-domain) simplify (apply-macete-with-minor-premises ran-of-inverse) (instantiate-theorem inverse-is-injective ("f")) (backchain "with(f:[ind_1,ind_2],injective_q{inverse{f}})")))) |
 | | (def-theorem equinumerous-is-transitive "forall(a:sets[ind_1],b:sets[ind_2],c:sets[ind_3], (a equinumerous b) and (b equinumerous c) implies (a equinumerous c))" (theory pure-generic-theory-3) (usages transportable-macete) (proof (direct-and-antecedent-inference-strategy (instantiate-existential ("f_$0 oo f")) insistent-direct-inference-strategy (apply-macete-with-minor-premises domain-composition) (apply-macete-with-minor-premises range-composition) (cut-with-single-formula "injective_q{f}") (cut-with-single-formula "injective_q{f_$0 oo f}") (backchain "with(f:[ind_1,ind_2],f_$0:[ind_2,ind_3], injective_q{f_$0 oo f})") (apply-macete-with-minor-premises injective-composition) simplify (apply-macete-with-minor-premises injective-iff-injective-on-domain) simplify))) |
 | | (def-theorem equinumerous-to-empty-indic "forall(a:sets[ind_1], (a equinumerous empty_indic{ind_2}) iff a=empty_indic{ind_1})" (theory pure-generic-theory-2) (usages transportable-macete) (proof (direct-inference-strategy (apply-macete-with-minor-premises rev%embeds-in-empty-indic) (apply-macete-with-minor-premises equinumerous-implies-embeds) (force-substitution "a" "empty_indic{ind_1}" (0)) (instantiate-existential ("lambda(x:ind_1,?ind_2)")) insistent-direct-inference-strategy extensionality direct-inference simplify extensionality direct-inference simplify simplify (beta-reduce-antecedent "with(p,q,r:prop, p and q and r)")))) |
| imps.mcmaster.ca /theories/cardinality/cardinality.html (327 words) |
|