view level-ex.agda @ 767:0f8e3b962c13

Added tag current for changeset c30ca91f3a76
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Tue, 12 Dec 2017 09:25:50 +0900
parents d6a6dd305da2
children
line wrap: on
line source

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  ℓ