Mercurial > hg > Members > kono > Proof > category

view src/level-ex.agda @ 1089:77e40cea8264

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
i : {b c : Obj A} (f : Hom A b c ) → ¬ ( f ≅ x ) → φ x f is bad
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 17 May 2021 00:42:08 +0900
parents ac53803b3b2a
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  ℓ