summaryrefslogtreecommitdiff
path: root/src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda
diff options
context:
space:
mode:
authorGreg Brown <greg.brown@cl.cam.ac.uk>2022-04-05 12:08:00 +0100
committerGreg Brown <greg.brown@cl.cam.ac.uk>2022-04-05 12:08:00 +0100
commit038d2109e78d9c688acfc3338140cc908151db76 (patch)
tree3687ed702cf13d728cffe23642a3fe6affb73310 /src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda
parentb212c150ec0a9bf45cf6c28fba997693669e78d2 (diff)
Generalise 0 comparison to ≤.
Diffstat (limited to 'src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda')
-rw-r--r--src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda b/src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda
index aa37d59..7972c4f 100644
--- a/src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda
+++ b/src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda
@@ -72,4 +72,5 @@ open import Helium.Algebra.Ordered.StrictTotal.Properties.Group group public
; x⁻¹≤ε⇒x≥ε; x⁻¹≥ε⇒x≤ε
; x<y⇒ε<y∙x⁻¹ ; ε<y∙x⁻¹⇒x<y
+ ; x≤y⇒ε≤y∙x⁻¹ ; ε≤y∙x⁻¹⇒x≤y
)