Fix import-statements. Make file that checks everything

This commit is contained in:
Frederik Hanghøj Iversen 2018-01-17 23:00:27 +01:00
parent e98793a620
commit da10e63cc8
5 changed files with 16 additions and 12 deletions

View File

@ -1,13 +1,14 @@
{-# OPTIONS --cubical #-}
{-# OPTIONS --cubical --allow-unsolved-metas #-}
module Category.Categories.Cat where
module Cat.Categories.Cat where
open import Agda.Primitive
open import Cubical
open import Function
open import Data.Product renaming (proj₁ to fst ; proj₂ to snd)
open import Category
open import Cat.Category
open import Cat.Functor
-- The category of categories
module _ { ' : Level} where
@ -29,10 +30,7 @@ module _ { ' : Level} where
-- → Functor.ident f ≡ Functor.ident g
-- → Functor.distrib f ≡ Functor.distrib g
f g
lift-eq
(functor func* func→ idnt distrib)
(functor func*₁ func→₁ idnt₁ distrib₁)
eq-func* = {!!}
lift-eq f g eq* x = {!!}
module _ {A B : Category {} {'}} {f : Functor A B} where
idHere = identity {} {'} {A}

View File

@ -1,6 +1,9 @@
{-# OPTIONS --cubical #-}
{-# OPTIONS --cubical --allow-unsolved-metas #-}
module Cat.Category.Bij where
open import Cubical.PathPrelude hiding ( Id )
open import Cubical.FromStdLib
module _ {A : Set} {a : A} {P : A Set} where
Q : A Set
@ -20,7 +23,7 @@ module _ {A : Set} {a : A} {P : A → Set} where
w x = {!!}
vw-bij : (a : P a) (w v) a a
vw-bij a = refl
vw-bij a = ?
-- tubij a with (t ∘ u) a
-- ... | q = {!!}

View File

@ -1,9 +1,10 @@
module Category.Free where
module Cat.Category.Free where
open import Agda.Primitive
open import Cubical.PathPrelude hiding (Path)
open import Data.Product
open import Category as C
open import Cat.Category as C
module _ { ' : Level} ( : Category {} {'}) where
private

View File

@ -1,7 +1,8 @@
{-# OPTIONS --cubical #-}
module Category.Pathy where
module Cat.Category.Pathy where
open import Level
open import Cubical.PathPrelude
{-

View File

@ -1,3 +1,4 @@
{-# OPTIONS --allow-unsolved-metas #-}
module Cat.Cubical where
open import Agda.Primitive