diff options
| author | Greg Brown <greg.brown01@ed.ac.uk> | 2022-12-05 14:47:03 +0000 |
|---|---|---|
| committer | Greg Brown <greg.brown01@ed.ac.uk> | 2022-12-05 14:47:03 +0000 |
| commit | 242197f40bb7957625be1e5f0bfd325af6e06be4 (patch) | |
| tree | b2e57e975979701bbf6e84de555efed055d01ede /src/Soat/FirstOrder/Algebra.idr | |
| parent | f77aeb6c4b25b381e897a4ab59c1008e34005404 (diff) | |
refactor: rename RawAlgebraWithRelation.
- RawAlgebraWithRelation -> RawSetoidAlgebra
- MkRawAlgebraWithRelation -> MkRawSetoidAlgebra
- rawWithRelation -> rawSetoid
Diffstat (limited to 'src/Soat/FirstOrder/Algebra.idr')
| -rw-r--r-- | src/Soat/FirstOrder/Algebra.idr | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/Soat/FirstOrder/Algebra.idr b/src/Soat/FirstOrder/Algebra.idr index f002dec..f0b23ea 100644 --- a/src/Soat/FirstOrder/Algebra.idr +++ b/src/Soat/FirstOrder/Algebra.idr @@ -19,8 +19,8 @@ record RawAlgebra (0 sig : Signature) where sem : sig `algebraOver` U public export -record RawAlgebraWithRelation (0 sig : Signature) where - constructor MkRawAlgebraWithRelation +record RawSetoidAlgebra (0 sig : Signature) where + constructor MkRawSetoidAlgebra raw : RawAlgebra sig 0 relation : IRel raw.U @@ -43,8 +43,8 @@ public export (.setoid) a = MkISetoid a.raw.U a.relation a.algebra.equivalence public export -(.rawWithRelation) : Algebra sig -> RawAlgebraWithRelation sig -(.rawWithRelation) a = MkRawAlgebraWithRelation a.raw a.relation +(.rawSetoid) : Algebra sig -> RawSetoidAlgebra sig +(.rawSetoid) a = MkRawSetoidAlgebra a.raw a.relation public export record IsHomomorphism |