Mercurial > hg > Members > kono > Proof > category

diff level-ex.agda @ 153:3249aaddc405

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
sync
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sat, 17 Aug 2013 21:09:34 +0900
parents
children d6a6dd305da2
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/level-ex.agda	Sat Aug 17 21:09:34 2013 +0900
@@ -0,0 +1,18 @@
+module level-ex where
+
+open import Level
+
+postulate ℓ : Level
+
+postulate A : Set ℓ
+
+postulate a : A
+
+lemma1 : Set  ℓ -> A
+lemma1  = \x -> a
+
+lemma2 : A -> Set  ℓ
+lemma2 = \x -> A
+
+lemma3 : Set  (suc ℓ)
+lemma3 = A -> Set  ℓ