diff options
| author | Greg Brown <greg.brown@cl.cam.ac.uk> | 2022-04-05 12:43:53 +0100 |
|---|---|---|
| committer | Greg Brown <greg.brown@cl.cam.ac.uk> | 2022-04-05 12:43:53 +0100 |
| commit | 7de7db24ba5bb2cfe9fae6f070e60db3510fcc69 (patch) | |
| tree | 50f3e5e49de31f640501844d8dd23f8baeba04a4 /src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda | |
| parent | 2f4a5a56437837cc90c9043131764513472347df (diff) | |
Add a useful transport proof.
Diffstat (limited to 'src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda')
| -rw-r--r-- | src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda b/src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda index 7972c4f..8ee5612 100644 --- a/src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda +++ b/src/Helium/Algebra/Ordered/StrictTotal/Properties/AbelianGroup.agda @@ -73,4 +73,6 @@ open import Helium.Algebra.Ordered.StrictTotal.Properties.Group group public ; x<y⇒ε<y∙x⁻¹ ; ε<y∙x⁻¹⇒x<y ; x≤y⇒ε≤y∙x⁻¹ ; ε≤y∙x⁻¹⇒x≤y + + ; x<y∙z⇒x∙z⁻¹<y ) |