Mercurial > hg > Members > kono > Proof > category

view level-ex.agda @ 157:34a152235ddd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
solution of universal mapping for free monoid
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 18 Aug 2013 22:30:30 +0900
parents 3249aaddc405
children d6a6dd305da2
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  ℓ