patrick/agdaproofs
1
0
Fork 0
mirror of https://github.com/Smaug123/agdaproofs synced 2025-10-14 07:58:41 +00:00
Code Issues Packages Projects Releases Wiki Activity

Binary naturals: Nearly got the monoid structure the same (#30)

Browse Source
This commit is contained in:
Patrick Stevens
2019-07-28 14:36:40 +01:00
committed by GitHub
parent 0c8e0f94ec
commit 226f1ad0f7
2 changed files with 76 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Numbers/Naturals.agda
View File

@@ -831,3 +831,6 @@ module Numbers.Naturals where
productZeroImpliesOperandZero {zero} {b} pr = inl refl
productZeroImpliesOperandZero {succ a} {zero} pr = inr refl
productZeroImpliesOperandZero {succ a} {succ b} ()
sumZeroImpliesOperandsZero : (a : ℕ) {b : ℕ} → a +N b ≡ 0 → (a ≡ 0) && (b ≡ 0)
sumZeroImpliesOperandsZero zero {zero} pr = refl ,, refl