view Paper/src/AgdaId.agda @ 7:6a61c1eb0205

これを提出した
author soto <soto@cr.ie.u-ryukyu.ac.jp>
date Thu, 12 May 2022 15:44:39 +0900
parents 14a0e409d574
children
line wrap: on
line source

identity : (A : Set) -> A -> A
identity A x = x

identity-zero : Nat
identity-zero = identity Nat zero