|
9 | 9 | module Data.Fin.Permutation where
|
10 | 10 |
|
11 | 11 | open import Data.Bool.Base using (true; false)
|
12 |
| -<<<<<<< refactor-Fin-properties |
13 |
| -open import Data.Fin.Base using (Fin; suc; opposite; punchIn; punchOut) |
14 |
| -open import Data.Fin.Patterns using (0F) |
| 12 | +open import Data.Fin.Base using (Fin; suc; cast; opposite; punchIn; punchOut) |
| 13 | +open import Data.Fin.Patterns using (0F; 1F) |
15 | 14 | open import Data.Fin.Properties
|
16 | 15 | using (¬Fin0; _≟_; ≟-diag-refl; ≟-off-diag
|
17 |
| - ; opposite-involutive |
| 16 | + ; cast-involutive; opposite-involutive |
18 | 17 | ; punchInᵢ≢i; punchOut-punchIn; punchIn-punchOut
|
19 | 18 | ; punchOut-cong; punchOut-cong′)
|
20 |
| -======= |
21 |
| -open import Data.Fin.Base using (Fin; suc; cast; opposite; punchIn; punchOut) |
22 |
| -open import Data.Fin.Patterns using (0F; 1F) |
23 |
| -open import Data.Fin.Properties using (punchInᵢ≢i; punchOut-punchIn; |
24 |
| - punchOut-cong; punchOut-cong′; punchIn-punchOut; _≟_; ¬Fin0; cast-involutive) |
25 |
| ->>>>>>> master |
26 | 19 | import Data.Fin.Permutation.Components as PC
|
27 | 20 | open import Data.Nat.Base using (ℕ; suc; zero)
|
28 | 21 | open import Data.Product.Base using (_,_)
|
@@ -106,13 +99,8 @@ flip = ↔-sym
|
106 | 99 |
|
107 | 100 | infixr 9 _∘ₚ_
|
108 | 101 |
|
109 |
| -<<<<<<< refactor-Fin-properties |
110 |
| -reverse : Permutation′ n |
111 |
| -reverse = permutation opposite opposite opposite-involutive opposite-involutive |
112 |
| -======= |
113 | 102 | _∘ₚ_ : Permutation m n → Permutation n o → Permutation m o
|
114 | 103 | π₁ ∘ₚ π₂ = π₂ ↔-∘ π₁
|
115 |
| ->>>>>>> master |
116 | 104 |
|
117 | 105 | ------------------------------------------------------------------------
|
118 | 106 | -- Non-trivial identity
|
@@ -144,8 +132,8 @@ reverse : Permutation n n
|
144 | 132 | reverse = permutation
|
145 | 133 | opposite
|
146 | 134 | opposite
|
147 |
| - PC.reverse-involutive |
148 |
| - PC.reverse-involutive |
| 135 | + opposite-involutive |
| 136 | + opposite-involutive |
149 | 137 |
|
150 | 138 | ------------------------------------------------------------------------
|
151 | 139 | -- Element removal
|
|
0 commit comments