Split out Integers and remove use of K (#39)

This commit is contained in:
Patrick Stevens
2019-08-22 08:37:41 +01:00
committed by GitHub
parent 26f20b2025
commit 9c14e7c439
15 changed files with 462 additions and 1583 deletions

View File

@@ -0,0 +1,17 @@
{-# OPTIONS --safe --warning=error --without-K #-}
open import Numbers.Integers.Definition
open import Numbers.Integers.Addition
open import Numbers.Integers.Multiplication
open import Numbers.Integers.Order
open import Groups.Definition
module Numbers.Integers.Integers where
open Numbers.Integers.Definition using ( ; nonneg ; negSucc) public
open Numbers.Integers.Addition using (_+Z_ ; Group ; AbGrp) public
open Numbers.Integers.Multiplication using (_*Z_ ; IntDom ; Ring) public
open Numbers.Integers.Order using (_<Z_ ; OrderedRing) public
_-Z_ :
a -Z b = a +Z (Group.inverse Group b)