diff options
| author | Greg Brown <greg.brown01@ed.ac.uk> | 2022-12-05 14:41:02 +0000 |
|---|---|---|
| committer | Greg Brown <greg.brown01@ed.ac.uk> | 2022-12-05 14:41:02 +0000 |
| commit | 8ff37b98737f4af5bd11d3006ae1b26902a1a82f (patch) | |
| tree | dcf38ec9122ff6d2a874d019563bc8e24af97358 /src/Soat/FirstOrder/Algebra.idr | |
| parent | 45e9bbec72bf338306d446012f077e195439aed0 (diff) | |
refactor : make Signature.T irrelevant.
Diffstat (limited to 'src/Soat/FirstOrder/Algebra.idr')
| -rw-r--r-- | src/Soat/FirstOrder/Algebra.idr | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Soat/FirstOrder/Algebra.idr b/src/Soat/FirstOrder/Algebra.idr index 245af6d..b8cbc0c 100644 --- a/src/Soat/FirstOrder/Algebra.idr +++ b/src/Soat/FirstOrder/Algebra.idr @@ -8,11 +8,11 @@ import Soat.FirstOrder.Signature %default total %hide Control.Relation.Equivalence -public export +public export 0 algebraOver : (sig : Signature) -> (U : sig.T -> Type) -> Type algebraOver sig x = {t : sig.T} -> (op : Op sig t) -> x ^ op.arity -> x t -public export +public export 0 algebraOver' : (sig : Signature) -> (U : sig.T -> Type) -> Type algebraOver' sig x = {t : sig.T} -> (op : Op sig t) -> map x op.arity `ary` x t |