view paper/src/AgdaId.agda @ 109:f6d00a13f923

Add ()
author atton
date Mon, 13 Feb 2017 14:11:30 +0900
parents 10a550bf7e4a
children
line wrap: on
line source

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

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