Skip to content
This repository was archived by the owner on Jul 24, 2024. It is now read-only.

Commit 7bc18a8

Browse files
ChrisHughes24mergify[bot]
authored andcommitted
feat(data/fin): coe_eq_val and coe_mk (#1321)
1 parent 253a9f7 commit 7bc18a8

File tree

1 file changed

+5
-1
lines changed

1 file changed

+5
-1
lines changed

src/data/fin.lean

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -34,7 +34,11 @@ lemma eq_iff_veq (a b : fin n) : a = b ↔ a.1 = b.1 :=
3434

3535
instance fin_to_nat (n : ℕ) : has_coe (fin n) nat := ⟨fin.val⟩
3636

37-
@[simp] def mk_val {m n : ℕ} (h : m < n) : (⟨m, h⟩ : fin n).val = m := rfl
37+
@[simp] lemma mk_val {m n : ℕ} (h : m < n) : (⟨m, h⟩ : fin n).val = m := rfl
38+
39+
@[simp] lemma coe_mk {m n : ℕ} (h : m < n) : ((⟨m, h⟩ : fin n) : ℕ) = m := rfl
40+
41+
lemma coe_eq_val (a : fin n) : (a : ℕ) = a.val := rfl
3842

3943
instance {n : ℕ} : decidable_linear_order (fin n) :=
4044
decidable_linear_order.lift fin.val (@fin.eq_of_veq _) (by apply_instance)

0 commit comments

Comments
 (0)