Skip to content

Commit

Permalink
Fix 2017 A1 (again)
Browse files Browse the repository at this point in the history
The hypotheses were contradictory without the missing positivity guard
as the following succeeds without the change included here:
```
  exfalso
  have : IsQualifying S := hS.1
  rw [IsQualifying_def] at this
  obtain ⟨h₁, h₂, h₃, h₄⟩ := this
  have : -7 ∈ S := h₃ (-7) (h₄ 2 h₂)
  replace this : 0 < -7 := h₁ _ this
  linarith
```

This was previously "fixed" in c4512ca
but unfortunately an error remained.
  • Loading branch information
ocfnash committed Sep 24, 2024
1 parent a558324 commit a3d5752
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion lean4/src/putnam_2017_a1.lean
Original file line number Diff line number Diff line change
Expand Up @@ -8,7 +8,7 @@ theorem putnam_2017_a1
(IsQualifying_def : ∀ S, IsQualifying S ↔
(∀ n ∈ S, 0 < n) ∧
2 ∈ S ∧
(∀ n, n ^ 2 ∈ S → n ∈ S) ∧
(∀ n > 0, n ^ 2 ∈ S → n ∈ S) ∧
(∀ n ∈ S, (n + 5) ^ 2 ∈ S))
(S : Set ℤ)
(hS : IsLeast IsQualifying S) :
Expand Down

0 comments on commit a3d5752

Please sign in to comment.