File tree Expand file tree Collapse file tree 2 files changed +4
-3
lines changed
Expand file tree Collapse file tree 2 files changed +4
-3
lines changed Original file line number Diff line number Diff line change 1+ import Std.Tactic.Do
2+
13def isPrime (n : Nat) : Bool := Id.run do
24 let mut i := 2
35 while i * i ≤ n do
@@ -40,8 +42,7 @@ example : isMultiplyPrime (9 * 9 * 9) = false := by native_decide
4042def Nat.IsPrime (n : Nat) : Prop :=
4143 n > 1 ∧ ∀ m, m ∣ n → m = 1 ∨ m = n
4244
43- theorem isPrime_is_correct (n : Nat) : isPrime n ↔ Nat.IsPrime n := by
44- sorry
45+ theorem isPrime_is_correct (n : Nat) : isPrime n ↔ Nat.IsPrime n := by sorry
4546
4647def IsMultiplyPrimeIff (solution : Nat → Bool) : Prop :=
4748 (a : Nat) → solution a ↔ ∃ (p₁ p₂ p₃ : Nat), p₁ * p₂ * p₃ = a ∧ Nat.IsPrime p₁ ∧ Nat.IsPrime p₂ ∧ Nat.IsPrime p₃
Original file line number Diff line number Diff line change 1- leanprover/lean4:v4.21.0
1+ leanprover/lean4:v4.22.0-rc1
You can’t perform that action at this time.
0 commit comments