diff options
| author | Hannes Schulze <haschu0103@outlook.de> | 2025-10-27 21:58:56 +0100 |
|---|---|---|
| committer | Hannes Schulze <haschu0103@outlook.de> | 2025-10-27 21:58:56 +0100 |
| commit | b3f26f306945ec9e391140f1645012ba11decb40 (patch) | |
| tree | bae99d681301af5da7f4a4019d6c391ab68971b5 /Nominal/Permutations.lean | |
| parent | 091fd832586627fbf31375fb5487d5e6fa6f7053 (diff) | |
quotient types as nominal sets
Diffstat (limited to 'Nominal/Permutations.lean')
| -rw-r--r-- | Nominal/Permutations.lean | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/Nominal/Permutations.lean b/Nominal/Permutations.lean index a2f8d56..0d6b81c 100644 --- a/Nominal/Permutations.lean +++ b/Nominal/Permutations.lean @@ -158,6 +158,12 @@ lemma swap_apply_left (a b : X) : ⸨a, b⸩ a = b := by lemma swap_apply_right (a b : X) : ⸨a, b⸩ b = a := by simp [swap] +/-- Lifting of Equiv.swap_inv to finite permutations. -/ +@[simp] +lemma swap_inv (a b : X) : ⸨a, b⸩⁻¹ = ⸨a, b⸩ := by + apply ext + simp [swap] + end FPerm example : FPerm ℕ := ⸨1, 2⸩ * ⸨3, 4⸩ * ⸨2, 3⸩ |