Move Functions (#119)

2025-10-11 22:58:40 +00:00 · 2020-04-18 17:47:27 +01:00
parent 84a146f72c
commit 1831ef49c4
112 changed files with 203 additions and 193 deletions
--- a/Groups/Cosets.agda
+++ b/Groups/Cosets.agda
@@ -2,7 +2,7 @@

 open import Sets.EquivalenceRelations
 open import Setoids.Setoids
-open import Functions
+open import Functions.Definition
 open import Groups.Definition
 open import Groups.Homomorphisms.Definition
 open import Groups.Subgroups.Definition
--- a/Groups/Examples/ExampleSheet1.agda
+++ b/Groups/Examples/ExampleSheet1.agda
@@ -2,7 +2,7 @@

 open import LogicalFormulae
 open import Setoids.Setoids
-open import Functions
+open import Functions.Definition
 open import Agda.Primitive using (Level; lzero; lsuc; _⊔_)
 open import Numbers.Naturals.Naturals
 open import Numbers.Integers.Integers
--- a/Groups/FinitePermutations.agda
+++ b/Groups/FinitePermutations.agda
@@ -3,7 +3,7 @@
 open import LogicalFormulae
 open import Numbers.Naturals.Semiring -- for length
 open import Lists.Lists
-open import Functions
+open import Functions.Definition
 --open import Groups.Actions

 module Groups.FinitePermutations where
--- a/Groups/FreeGroup/Definition.agda
+++ b/Groups/FreeGroup/Definition.agda
@@ -2,7 +2,7 @@

 open import LogicalFormulae
 open import Setoids.Setoids
-open import Functions
+open import Functions.Definition
 open import Agda.Primitive using (Level; lzero; lsuc; _⊔_)
 open import Numbers.Naturals.Semiring
 open import Numbers.Naturals.Order
--- a/Groups/FreeGroup/Lemmas.agda
+++ b/Groups/FreeGroup/Lemmas.agda
@@ -11,7 +11,8 @@ open import Numbers.Naturals.Semiring
 open import Numbers.Naturals.Order
 open import LogicalFormulae
 open import Semirings.Definition
-open import Functions
+open import Functions.Definition
+open import Functions.Lemmas
 open import Groups.Isomorphisms.Definition
 open import Groups.FreeGroup.Word
 open import Groups.FreeGroup.Group
--- a/Groups/FreeGroup/Parity.agda
+++ b/Groups/FreeGroup/Parity.agda
@@ -9,7 +9,7 @@ open import Decidable.Sets
 open import Numbers.Naturals.Order
 open import LogicalFormulae
 open import Semirings.Definition
-open import Functions
+open import Functions.Definition
 open import Groups.Isomorphisms.Definition
 open import Boolean.Definition

--- a/Groups/FreeProduct/Addition.agda
+++ b/Groups/FreeProduct/Addition.agda
@@ -1,7 +1,7 @@
 {-# OPTIONS --safe --warning=error #-}

 open import Sets.EquivalenceRelations
-open import Functions
+open import Functions.Definition
 open import Agda.Primitive using (Level; lzero; lsuc; _⊔_; Setω)
 open import Setoids.Setoids
 open import Groups.Definition
--- a/Groups/FreeProduct/Definition.agda
+++ b/Groups/FreeProduct/Definition.agda
@@ -1,7 +1,7 @@
 {-# OPTIONS --safe --warning=error --without-K #-}

 open import Sets.EquivalenceRelations
-open import Functions
+open import Functions.Definition
 open import Agda.Primitive using (Level; lzero; lsuc; _⊔_; Setω)
 open import Setoids.Setoids
 open import Groups.Definition
--- a/Groups/FreeProduct/Group.agda
+++ b/Groups/FreeProduct/Group.agda
@@ -1,7 +1,7 @@
 {-# OPTIONS --safe --warning=error #-}

 open import Sets.EquivalenceRelations
-open import Functions
+open import Functions.Definition
 open import Agda.Primitive using (Level; lzero; lsuc; _⊔_; Setω)
 open import Setoids.Setoids
 open import Groups.Definition
--- a/Groups/FreeProduct/Setoid.agda
+++ b/Groups/FreeProduct/Setoid.agda
@@ -1,7 +1,7 @@
 {-# OPTIONS --safe --warning=error #-}

 open import Sets.EquivalenceRelations
-open import Functions
+open import Functions.Definition
 open import Agda.Primitive using (Level; lzero; lsuc; _⊔_; Setω)
 open import Setoids.Setoids
 open import Groups.Definition
--- a/Groups/FreeProduct/UniversalProperty.agda
+++ b/Groups/FreeProduct/UniversalProperty.agda
@@ -1,7 +1,7 @@
 {-# OPTIONS --safe --warning=error #-}

 open import Sets.EquivalenceRelations
-open import Functions
+open import Functions.Definition
 open import Agda.Primitive using (Level; lzero; lsuc; _⊔_; Setω)
 open import Setoids.Setoids
 open import Groups.Definition
--- a/Groups/Homomorphisms/Examples.agda
+++ b/Groups/Homomorphisms/Examples.agda
@@ -1,7 +1,7 @@
 {-# OPTIONS --safe --warning=error --without-K #-}

 open import Setoids.Setoids
-open import Functions
+open import Functions.Definition
 open import Groups.Definition
 open import Sets.EquivalenceRelations
 open import Groups.Homomorphisms.Definition
--- a/Groups/Homomorphisms/Lemmas.agda
+++ b/Groups/Homomorphisms/Lemmas.agda
@@ -1,7 +1,7 @@
 {-# OPTIONS --safe --warning=error --without-K #-}

 open import Setoids.Setoids
-open import Functions
+open import Functions.Definition
 open import Groups.Definition
 open import Sets.EquivalenceRelations
 open import Groups.Homomorphisms.Definition
--- a/Groups/Homomorphisms/Lemmas2.agda
+++ b/Groups/Homomorphisms/Lemmas2.agda
@@ -6,7 +6,7 @@ open import Groups.Homomorphisms.Definition
 open import Groups.Definition
 open import Numbers.Naturals.Naturals
 open import Setoids.Setoids
-open import Functions
+open import Functions.Definition
 open import Sets.EquivalenceRelations

 open import Agda.Primitive using (Level; lzero; lsuc; _⊔_)
--- a/Groups/Isomorphisms/Lemmas.agda
+++ b/Groups/Isomorphisms/Lemmas.agda
@@ -2,7 +2,7 @@

 open import LogicalFormulae
 open import Setoids.Setoids
-open import Functions
+open import Functions.Definition
 open import Groups.Definition
 open import Sets.EquivalenceRelations
 open import Groups.Isomorphisms.Definition
--- a/Groups/LectureNotes/Lecture1.agda
+++ b/Groups/LectureNotes/Lecture1.agda
@@ -2,7 +2,8 @@

 open import LogicalFormulae
 open import Setoids.Setoids
-open import Functions
+open import Functions.Definition
+open import Functions.Lemmas
 open import Agda.Primitive using (Level; lzero; lsuc; _⊔_)
 open import Numbers.Naturals.Semiring
 open import Numbers.Naturals.Order
--- a/Groups/Orders/Archimedean.agda
+++ b/Groups/Orders/Archimedean.agda
@@ -6,7 +6,6 @@ open import Groups.Definition
 open import Groups.Orders.Partial.Definition
 open import Setoids.Orders.Partial.Definition
 open import Setoids.Setoids
-open import Functions

 open import Agda.Primitive using (Level; lzero; lsuc; _⊔_)

--- a/Groups/Orders/Partial/Definition.agda
+++ b/Groups/Orders/Partial/Definition.agda
@@ -3,7 +3,7 @@
 open import Groups.Definition
 open import Setoids.Orders.Partial.Definition
 open import Setoids.Setoids
-open import Functions
+open import Functions.Definition

 open import Agda.Primitive using (Level; lzero; lsuc; _⊔_)

--- a/Groups/Polynomials/Addition.agda
+++ b/Groups/Polynomials/Addition.agda
@@ -4,11 +4,10 @@ open import LogicalFormulae
 open import Groups.Abelian.Definition
 open import Groups.Definition
 open import Setoids.Setoids
-open import Functions
+open import Functions.Definition
 open import Sets.EquivalenceRelations
 open import Lists.Lists

-
 module Groups.Polynomials.Addition {a b : _} {A : Set a} {S : Setoid {a} {b} A} {_+_ : A → A → A} (G : Group S _+_) where

 open import Groups.Polynomials.Definition G
--- a/Groups/QuotientGroup/Lemmas.agda
+++ b/Groups/QuotientGroup/Lemmas.agda
@@ -1,6 +1,6 @@
 {-# OPTIONS --warning=error --safe --without-K #-}

-open import Functions
+open import Functions.Definition
 open import Groups.Definition
 open import Groups.Homomorphisms.Definition
 open import Setoids.Setoids
@@ -25,7 +25,6 @@ quotientGroupLemma' {S = S} {T = T} G {H = H} f fx=fy = transferToRight H (trans
    open Setoid T
    open Equivalence eq

-
 projectionMapIsGroupHom : GroupHom G (quotientGroupByHom G fHom) id
 GroupHom.groupHom projectionMapIsGroupHom {x} {y} = quotientGroupLemma G fHom (Equivalence.reflexive (Setoid.eq T))
 GroupHom.wellDefined projectionMapIsGroupHom x=y = quotientGroupLemma G fHom (GroupHom.wellDefined fHom x=y)