comparison level-ex.agda @ 153:3249aaddc405

sync
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sat, 17 Aug 2013 21:09:34 +0900
parents
children d6a6dd305da2
comparison
equal deleted inserted replaced
152:5435469c6cf0 153:3249aaddc405
1 module level-ex where
2
3 open import Level
4
5 postulate ℓ : Level
6
7 postulate A : Set ℓ
8
9 postulate a : A
10
11 lemma1 : Set ℓ -> A
12 lemma1 = \x -> a
13
14 lemma2 : A -> Set ℓ
15 lemma2 = \x -> A
16
17 lemma3 : Set (suc ℓ)
18 lemma3 = A -> Set ℓ