2014-10-10 22:41:55 +00:00
|
|
|
VISIT cat.lean
|
|
|
|
SYNC 10
|
|
|
|
import logic
|
|
|
|
constant category : Type -> Type
|
|
|
|
namespace category
|
2014-10-12 00:13:33 +00:00
|
|
|
context
|
2014-10-10 22:41:55 +00:00
|
|
|
parameters {ob : Type} {C : category ob}
|
|
|
|
variables {a b c d : ob}
|
|
|
|
definition hom : ob → ob → Type := let aux := C in sorry
|
|
|
|
definition foo := hom
|
|
|
|
end
|
|
|
|
end category
|
|
|
|
WAIT
|
|
|
|
INFO 8
|