reduce imported mathlib chunk

This commit is contained in:
Jon Eugster
2023-04-04 21:29:10 +02:00
parent 2ec897fa39
commit 94b5af1623
122 changed files with 715 additions and 863 deletions
+2 -1
View File
@@ -1,7 +1,8 @@
import Adam.Metadata
import Adam.ToBePorted
import Mathlib
import Adam.Options.MathlibPart
set_option tactic.hygienic false
open Finset
@@ -1,7 +1,6 @@
import Adam.Metadata
import Mathlib.Algebra.BigOperators.Fin
import Mathlib.Tactic.Ring
import Adam.Options.MathlibPart
import Adam.ToBePorted
+1 -2
View File
@@ -1,8 +1,7 @@
import Adam.Metadata
import Adam.ToBePorted
import Mathlib.Algebra.BigOperators.Fin
import Mathlib.Tactic.Ring
import Adam.Options.MathlibPart
Game "Adam"
World "Sum"
+1 -2
View File
@@ -1,8 +1,7 @@
import Adam.Metadata
import Adam.ToBePorted
import Mathlib.Algebra.BigOperators.Fin
import Mathlib.Tactic.Ring
import Adam.Options.MathlibPart
import Adam.Options.ArithSum
+1 -3
View File
@@ -1,10 +1,8 @@
import Adam.Metadata
import Adam.ToBePorted
import Mathlib.Algebra.BigOperators.Fin
import Mathlib.Tactic.Ring
import Adam.Options.MathlibPart
import Adam.ToBePorted
import Adam.Options.ArithSum
Game "Adam"
+27 -27
View File
@@ -1,38 +1,38 @@
import Adam.Metadata
-- import Adam.Metadata
import Adam.ToBePorted
import Mathlib.Algebra.BigOperators.Fin
-- import Adam.ToBePorted
-- import Adam.Options.MathlibPart
set_option tactic.hygienic false
-- set_option tactic.hygienic false
open Nat
-- open Nat
Game "Adam"
World "Sum"
Level 2
-- Game "Adam"
-- World "Sum"
-- Level 2
Title "endliche Summe"
-- Title "endliche Summe"
-- TODO: Tactics `mono` and `omega` are not ported yet.
-- -- TODO: Tactics `mono` and `omega` are not ported yet.
Introduction
"
2^n > n^2 für n ≥ 5
"
-- Introduction
-- "
-- 2^n > n^2 für n ≥ 5
-- "
Statement
"2^n > n^2 für n ≥ 5"
(n : ℕ) : (n + 5)^2 < 2 ^ (n + 5) := by
induction' n with n ih
simp
rw [succ_eq_add_one]
simp_rw [add_pow_two] at *
ring_nf at ih ⊢
sorry
-- Statement
-- "2^n > n^2 für n ≥ 5"
-- (n : ℕ) : (n + 5)^2 < 2 ^ (n + 5) := by
-- induction' n with n ih
-- simp
-- rw [succ_eq_add_one]
-- simp_rw [add_pow_two] at *
-- ring_nf at ih ⊢
-- sorry
example (n : ℕ) (h : 5 ≤ n) : n^2 < 2 ^ n
| 0 | 1 | 2 | 3 | 4 => by
sorry
| n + 5 => by sorry
-- example (n : ℕ) (h : 5 ≤ n) : n^2 < 2 ^ n
-- | 0 | 1 | 2 | 3 | 4 => by
-- sorry
-- | n + 5 => by sorry
+22 -22
View File
@@ -1,31 +1,31 @@
import Adam.Metadata
-- import Adam.Metadata
import Adam.ToBePorted
import Mathlib.Algebra.BigOperators.Fin
-- import Adam.ToBePorted
-- import Adam.Options.MathlibPart
set_option tactic.hygienic false
-- set_option tactic.hygienic false
Game "Adam"
World "Sum"
Level 2
-- Game "Adam"
-- World "Sum"
-- Level 2
Title "endliche Summe"
-- Title "endliche Summe"
Introduction
"
n^3 + 2n ist durch 3 teilbar für alle ganzen Zahlen n
"
-- Introduction
-- "
-- n^3 + 2n ist durch 3 teilbar für alle ganzen Zahlen n
-- "
Statement
"n^3 + 2n ist durch 3 teilbar für alle ganzen Zahlen n"
(n : ℤ) : 3 ∣ n^3 + 2*n := by
induction n
induction a
norm_cast
change 3 ∣ (Nat.succ n : ℤ) ^ 3 + 2 * (Nat.succ n : ℤ)
rw [Int.ofNat_succ]
sorry
sorry
-- Statement
-- "n^3 + 2n ist durch 3 teilbar für alle ganzen Zahlen n"
-- (n : ℤ) : 3 ∣ n^3 + 2*n := by
-- induction n
-- induction a
-- norm_cast
-- change 3 ∣ (Nat.succ n : ℤ) ^ 3 + 2 * (Nat.succ n : ℤ)
-- rw [Int.ofNat_succ]
-- sorry
-- sorry
-- example (n : ℕ) : (n - 1) * (n + 1) = (n ^ 2 - 1) := by
-- induction' n with n hn
@@ -1,8 +1,7 @@
import Adam.Metadata
import Adam.ToBePorted
import Mathlib.Algebra.BigOperators.Fin
import Mathlib.Tactic.Ring
import Adam.Options.MathlibPart
import Adam.ToBePorted