summaryrefslogtreecommitdiff
path: root/src/Helium/Algebra/Ordered/StrictTotal/Properties/Field.agda
diff options
context:
space:
mode:
authorGreg Brown <greg.brown@cl.cam.ac.uk>2022-04-05 12:43:53 +0100
committerGreg Brown <greg.brown@cl.cam.ac.uk>2022-04-05 12:43:53 +0100
commit7de7db24ba5bb2cfe9fae6f070e60db3510fcc69 (patch)
tree50f3e5e49de31f640501844d8dd23f8baeba04a4 /src/Helium/Algebra/Ordered/StrictTotal/Properties/Field.agda
parent2f4a5a56437837cc90c9043131764513472347df (diff)
Add a useful transport proof.
Diffstat (limited to 'src/Helium/Algebra/Ordered/StrictTotal/Properties/Field.agda')
-rw-r--r--src/Helium/Algebra/Ordered/StrictTotal/Properties/Field.agda2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Helium/Algebra/Ordered/StrictTotal/Properties/Field.agda b/src/Helium/Algebra/Ordered/StrictTotal/Properties/Field.agda
index 1669172..9ab34f2 100644
--- a/src/Helium/Algebra/Ordered/StrictTotal/Properties/Field.agda
+++ b/src/Helium/Algebra/Ordered/StrictTotal/Properties/Field.agda
@@ -80,6 +80,8 @@ open import Helium.Algebra.Ordered.StrictTotal.Properties.DivisionRing divisionR
; x<y⇒0<y-x; 0<y-x⇒x<y
; x≤y⇒0≤y-x; 0≤y-x⇒x≤y
+ ; x<y+z⇒x-z<y
+
; 0≤1; 1≈0⇒x≈y; x≉y⇒0<1; x<y⇒0<1
; x>0⇒*-monoˡ-<; x>0⇒*-monoʳ-<; x<0⇒*-anti-monoˡ-<; x<0⇒*-anti-monoʳ-<