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/Field.agda | |
parent | 2f4a5a56437837cc90c9043131764513472347df (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.agda | 2 |
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ʳ-< |