reduce imported mathlib chunk
This commit is contained in:
@@ -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,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,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,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"
|
||||
|
||||
@@ -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
|
||||
|
||||
@@ -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
|
||||
|
||||
|
||||
Reference in New Issue
Block a user