From 865e9dbdd0a7ed2b0dad75f2c672ad84e9e85bcc Mon Sep 17 00:00:00 2001 From: Greg Brown Date: Fri, 25 Nov 2022 14:30:36 +0000 Subject: Make proofs relevant. --- src/Soat/Relation.idr | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/Soat/Relation.idr') diff --git a/src/Soat/Relation.idr b/src/Soat/Relation.idr index bf5a631..9a394c2 100644 --- a/src/Soat/Relation.idr +++ b/src/Soat/Relation.idr @@ -70,6 +70,6 @@ IEquivalence x rel = (i : a) -> Soat.Relation.Equivalence (x i) (rel i) public export record ISetoid (a : Type) where constructor MkISetoid - 0 U : a -> Type - 0 relation : IRel U - 0 equivalence : IEquivalence U relation + 0 U : a -> Type + 0 relation : IRel U + equivalence : IEquivalence U relation -- cgit v1.2.3