diff options
author | Jacques Comeaux <jacquesrcomeaux@protonmail.com> | 2025-07-19 01:36:42 -0500 |
---|---|---|
committer | Jacques Comeaux <jacquesrcomeaux@protonmail.com> | 2025-07-19 01:36:42 -0500 |
commit | 4c4ca752bcbc900b3ffa30602c955728778dc9a1 (patch) | |
tree | 96a2cbbdc12306c96f13410b5dd53bf869b7f377 /Data/Permutation.agda | |
parent | 44a665ee5bb2659be2147881e2e0e869570429cf (diff) |
Show equivalence of old and new Hypergraph setoids
Diffstat (limited to 'Data/Permutation.agda')
-rw-r--r-- | Data/Permutation.agda | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/Data/Permutation.agda b/Data/Permutation.agda index 2413a0d..55c8748 100644 --- a/Data/Permutation.agda +++ b/Data/Permutation.agda @@ -2,7 +2,7 @@ open import Level using (Level) -module Data.Permutation {ℓ : Level} (A : Set ℓ) where +module Data.Permutation {ℓ : Level} {A : Set ℓ} where import Data.Fin as Fin import Data.Fin.Properties as FinProp @@ -39,8 +39,7 @@ module _ where -- convert a List permutation to a Vector permutation fromList-↭ - : {A : Set} - {xs ys : List A} + : {xs ys : List A} → xs ↭ ys → fromList xs ↭′ fromList ys fromList-↭ refl = ↭-refl |