diff category-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
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/category-ex.agda	Sat Aug 17 21:09:34 2013 +0900
@@ -0,0 +1,18 @@
+module category-ex where
+
+open import Level
+open import Category
+postulate c₁ c₂ ℓ : Level
+postulate A : Category c₁ c₂ ℓ
+
+postulate a b c : Obj A
+postulate g : Hom A a b
+postulate f : Hom A b c
+
+open Category.Category
+
+h = _o_  A f g
+
+i = A [ f o g ]
+
+