diff options
| author | Greg Brown <greg.brown01@ed.ac.uk> | 2022-12-05 14:43:50 +0000 |
|---|---|---|
| committer | Greg Brown <greg.brown01@ed.ac.uk> | 2022-12-05 14:43:50 +0000 |
| commit | f77aeb6c4b25b381e897a4ab59c1008e34005404 (patch) | |
| tree | 07e8f0ec56bda51e9489b7b49558a3c2d860f932 /src/Soat/SecondOrder/Algebra.idr | |
| parent | 8ff37b98737f4af5bd11d3006ae1b26902a1a82f (diff) | |
refactor: rename MakeRawAlgebra -> MkRawAlgebra.
Diffstat (limited to 'src/Soat/SecondOrder/Algebra.idr')
| -rw-r--r-- | src/Soat/SecondOrder/Algebra.idr | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Soat/SecondOrder/Algebra.idr b/src/Soat/SecondOrder/Algebra.idr index 50877e9..664a5d7 100644 --- a/src/Soat/SecondOrder/Algebra.idr +++ b/src/Soat/SecondOrder/Algebra.idr @@ -24,7 +24,7 @@ algebraOver sig x = (ctx : List sig.T) -> {t : sig.T} -> (op : Op sig t) public export record RawAlgebra (0 sig : Signature) where - constructor MakeRawAlgebra + constructor MkRawAlgebra 0 U : (t : sig.T) -> (ctx : List sig.T) -> Type rename : (t : sig.T) -> forall ctx, ctx' . (f : ctx `Sublist` ctx') -> U t ctx -> U t ctx' sem : sig `algebraOver` U |