mirror of
https://github.com/Smaug123/agdaproofs
synced 2025-10-20 10:38:39 +00:00
Lots of speedups (#116)
This commit is contained in:
@@ -8,6 +8,9 @@ module Numbers.Integers.Definition where
|
||||
data ℤ : Set where
|
||||
nonneg : ℕ → ℤ
|
||||
negSucc : ℕ → ℤ
|
||||
{-# BUILTIN INTEGER ℤ #-}
|
||||
{-# BUILTIN INTEGERPOS nonneg #-}
|
||||
{-# BUILTIN INTEGERNEGSUC negSucc #-}
|
||||
|
||||
nonnegInjective : {a b : ℕ} → nonneg a ≡ nonneg b → a ≡ b
|
||||
nonnegInjective refl = refl
|
||||
|
Reference in New Issue
Block a user