Mercurial > hg > Papers > 2021 > soto-prosym
comparison Paper/src/AgdaInstance.agda.replaced @ 0:c59202657321
init
author | soto <soto@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Tue, 02 Nov 2021 06:55:58 +0900 |
parents | |
children | 339fb67b4375 |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:c59202657321 |
---|---|
1 _==Nat_ : Nat @$\rightarrow$@ Nat @$\rightarrow$@ Bool | |
2 zero ==Nat zero = true | |
3 (suc n) ==Nat zero = false | |
4 zero ==Nat (suc m) = false | |
5 (suc n) ==Nat (suc m) = n ==Nat m | |
6 | |
7 instance | |
8 natHas== : Eq Nat | |
9 natHas== = record { _==_ = _==Nat_} |