2014-10-10 15:41:55 -07:00
|
|
|
VISIT cat.lean
|
|
|
|
|
SYNC 10
|
|
|
|
|
import logic
|
|
|
|
|
constant category : Type -> Type
|
|
|
|
|
namespace category
|
2014-10-11 17:13:33 -07:00
|
|
|
context
|
2014-10-10 15:41:55 -07: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
|
