Compfiles/Usa1988P3.lean
Explanation legend Lean4 Domain Explanation Language (L4DEL)
L4DEL explanations are a separate layer. They do not change the Lean source. Intuition is explanatory prose; numbered items are a reading path; sources link the wording back to evidence.
- L4DEL
- Lean4 Domain Explanation Language
Credit: The upstream authors and contributors retain credit for the project and mathematics. lean4-explainer only renders their pinned source and adds the separately disclosed explanation layer.
Project sources: Pinned compfiles documentation, Pinned compfiles corpus index
2 declarations, 0 contain sorry, 0 declared as axioms
USA Mathematical Olympiad 1988, Problem 3
Let X be the set {1, 2, ... , 20} and let P be the set of all 9-element subsets of X. Show that for any map f : P → X we can find a 10-element subset Y of X, such that f(Y - {k}) ≠ k for any k in Y.
Imports (4)
Imported by 1 file
- lemma
Usa1988P3.card_bad_pairs_leDocumented declaration: card_bad_pairs_le line 39 sourceSource documentation
For any finite set
X, the number of pairs(Y, k)whereYis a 10-element subset ofX,k ∈ Y, andf (Y.erase k) = kis at most the number of 9-element subsets ofX: the map(Y, k) ↦ Y.erase kis injective on such pairs, becausek = f (Y.erase k)is determined by the image, and thenY = insert k (Y.erase k)is determined as well.standard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Finset,Nat,LE.le,Finset.card,Sigma,Finset.sigma,Finset.powersetCard,OfNat.ofNat,Finset.filter,Eq,Finset.eraseProof uses:
Finset.card_le_card_of_injOn,Sigma.fst,Sigma.snd,Membership.mem,Set,Sigma.mk,And,Eq.mp,Eq.trans,congr,congrArg,congrFun',Finset.filter_congr,Iff.of_eq,Eq.refl,id,Eq.mpr,propext,Finset.mem_powersetCard,And.introand 11 more21 instances, coercions and auxiliary constants left out.
Tactic trace: 21 steps
Open to load the checked before-and-after goal states.
lemma card_bad_pairs_le (X : Finset ℕ) (f : Finset ℕ → ℕ) : ((X.powersetCard 10).sigma (fun Y ↦ Y.filter (fun k ↦ f (Y.erase k) = k))).card ≤ (X.powersetCard 9).card := by …Mentions: f
- problem
Usa1988P3.usa1988_p3line 64 sourcestandard axioms: Classical.choice, Quot.sound, propext what this means
Statement uses:
Finset,Nat,Exists,And,LE.le,Finset.Icc,OfNat.ofNat,Eq,Finset.card,Membership.mem,Ne,Finset.eraseProof uses:
Decidable.byContradiction,Not,Finset.powersetCard,Finset.filter,Eq.mp,Eq.trans,binderNameHint,forall_congr,Mathlib.Tactic.Push.not_and_eq,implies_congr,Eq.refl,Mathlib.Tactic.Push.not_forall_eq,congrArg,funext,And.left,propext,Finset.mem_powersetCard,And.right,Iff.mpr,LT.ltand 27 more37 instances, coercions and auxiliary constants left out.
Tactic trace: 18 steps
Open to load the checked before-and-after goal states.