Move product, exponential, ...

src/Cat.agda

@@ -1,12 +1,12 @@
 module Cat where
 
 import Cat.Category
-import Cat.Functor
 import Cat.CwF
-import Cat.CartesianClosed
-import Cat.Exponential
-import Cat.Product
 
+import Cat.Category.Functor
+import Cat.Category.Product
+import Cat.Category.Exponential
+import Cat.Category.CartesianClosed
 import Cat.Category.Pathy
 import Cat.Category.Bij
 import Cat.Category.Free

src/Cat/Categories/Cube.agda

@@ -13,7 +13,7 @@ open import Relation.Nullary
 open import Relation.Nullary.Decidable
 
 open import Cat.Category
-open import Cat.Functor
+open import Cat.Category.Functor
 open import Cat.Equality
 open Equality.Data.Product
 

src/Cat/Categories/Fun.agda

@@ -7,7 +7,7 @@ open import Function
 open import Data.Product
 
 open import Cat.Category
-open import Cat.Functor
+open import Cat.Category.Functor
 
 module _ {ℓc ℓc' ℓd ℓd' : Level} {ℂ : Category ℓc ℓc'} {𝔻 : Category ℓd ℓd'} where
   open Category hiding ( _∘_ ; Arrow )

src/Cat/Categories/Sets.agda

@@ -7,8 +7,8 @@ open import Data.Product
 import Function
 
 open import Cat.Category
-open import Cat.Functor
+open import Cat.Category.Functor
-open import Cat.Product
+open import Cat.Category.Product
 open Category
 
 module _ {ℓ : Level} where

src/Cat/Category/CartesianClosed.agda

@@ -1,10 +1,10 @@
-module Cat.CartesianClosed where
+module Cat.Category.CartesianClosed where
 
 open import Agda.Primitive
 
 open import Cat.Category
-open import Cat.Product
+open import Cat.Category.Product
-open import Cat.Exponential
+open import Cat.Category.Exponential
 
 record CartesianClosed {ℓ ℓ' : Level} (ℂ : Category ℓ ℓ') : Set (ℓ ⊔ ℓ') where
   field

src/Cat/Category/Exponential.agda

@@ -1,11 +1,11 @@
-module Cat.Exponential where
+module Cat.Category.Exponential where
 
 open import Agda.Primitive
 open import Data.Product
 open import Cubical
 
 open import Cat.Category
-open import Cat.Product
+open import Cat.Category.Product
 
 open Category
 

src/Cat/Category/Functor.agda

@@ -1,4 +1,4 @@
-module Cat.Functor where
+module Cat.Category.Functor where
 
 open import Agda.Primitive
 open import Cubical

src/Cat/Category/Product.agda

@@ -1,4 +1,4 @@
-module Cat.Product where
+module Cat.Category.Product where
 
 open import Agda.Primitive
 open import Data.Product

src/Cat/Category/Properties.agda

@@ -7,7 +7,7 @@ open import Data.Product
 open import Cubical
 
 open import Cat.Category
-open import Cat.Functor
+open import Cat.Category.Functor
 open import Cat.Categories.Sets
 open import Cat.Equality
 open Equality.Data.Product
@@ -51,7 +51,6 @@ epi-mono-is-not-iso f =
 
 open import Cat.Category
 open Category
-open import Cat.Functor
 open Functor
 
 -- module _ {ℓ : Level} {ℂ : Category ℓ ℓ}

src/Cat/CwF.agda

@@ -4,7 +4,7 @@ open import Agda.Primitive
 open import Data.Product
 
 open import Cat.Category
-open import Cat.Functor
+open import Cat.Category.Functor
 open import Cat.Categories.Fam
 
 open Category