view paper/src/AgdaId.agda @ 64:10a550bf7e4a

Mini fixes with ryokka-san
author atton <atton@cr.ie.u-ryukyu.ac.jp>
date Fri, 03 Feb 2017 14:49:58 +0900
parents fb42478e4c96
children
line wrap: on
line source

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

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