Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
73 changes: 35 additions & 38 deletions CHANGELOG.md
Original file line number Diff line number Diff line change
Expand Up @@ -67,10 +67,9 @@ Minor improvements
`refl`, `sym`, and `trans` have been weakened to allow relations of different
levels to be used.

* Due to becoming large, `Data.Tree.AVL.Indexed.Relation.Unary.Any.Properties`
has been split into smaller modules
`Data.Tree.AVL.Indexed.Relation.Unary.Any.Properties.*`
that are reexported by the original `Properties`.
* The original `Data.Tree.AVL.Indexed.Relation.Unary.Any.Properties` has been
split up into smaller `Data.Tree.AVL.Indexed.Relation.Unary.Any.Properties.*`
modules that are reexported by `Properties`.

Deprecated modules
------------------
Expand Down Expand Up @@ -152,10 +151,6 @@ Deprecated names
New modules
-----------

* Added tactic ring solvers for rational numbers (issue #1879):
`Data.Rational.Tactic.RingSolver`,
`Data.Rational.Unnormalised.Tactic.RingSolver`.

* `Algebra.Construct.Sub.Group` for the definition of subgroups.

* `Algebra.Module.Construct.Sub.Bimodule` for the definition of subbimodules.
Expand All @@ -170,12 +165,6 @@ New modules

* `Data.List.Fresh.Membership.DecSetoid`.

* `Data.List.Relation.Binary.Permutation.Algorithmic{.Properties}` for the Choudhury and Fiore definition of permutation, and its equivalence with `Declarative` below.

* `Data.List.Relation.Binary.Permutation.Declarative{.Properties}` for the least congruence on `List` making `_++_` commutative, and its equivalence with the `Setoid` definition.

* `Effect.Monad.Random` and `Effect.Monad.Random.Instances` for an mtl-style randomness monad constraint.

* Various additions over non-empty lists:
```
Data.List.NonEmpty.Relation.Binary.Pointwise
Expand All @@ -184,6 +173,16 @@ New modules
Data.List.NonEmpty.Membership.Setoid
```

* `Data.List.Relation.Binary.Permutation.Algorithmic{.Properties}` for the Choudhury and Fiore definition of permutation, and its equivalence with `Declarative` below.

* `Data.List.Relation.Binary.Permutation.Declarative{.Properties}` for the least congruence on `List` making `_++_` commutative, and its equivalence with the `Setoid` definition.

* Added tactic ring solvers for rational numbers (issue #1879):
```agda
Data.Rational.Tactic.RingSolver
Data.Rational.Unnormalised.Tactic.RingSolver
```

* Refactoring of `Data.Tree.AVL.Indexed.Relation.Unary.Any.Properties` as smaller modules:
```
Data.Tree.AVL.Indexed.Relation.Unary.Any.Properties.Lookup
Expand All @@ -196,6 +195,8 @@ New modules
Data.Tree.AVL.Indexed.Relation.Unary.Any.Properties.Singleton
```

* `Effect.Monad.Random` and `Effect.Monad.Random.Instances` for an mtl-style randomness monad constraint.

* `Relation.Binary.Morphism.Construct.On`: given a relation `_∼_` on `B`,
and a function `f : A → B`, construct the canonical `IsRelMonomorphism`
between `_∼_ on f` and `_∼_`, witnessed by `f` itself.
Expand Down Expand Up @@ -355,7 +356,7 @@ Additions to existing modules

≲%[o]⇒≡[o]% : .{{_ : NonZero o}} → _≲%[ o ]_ ⇒ _≡%[ o ]_
≅%[o]⇒≡[o]% : .{{_ : NonZero o}} → _≅%[ o ]_ ⇒ _≡%[ o ]_
≡[o]%⇒≲%[o] : .{{_ : NonZero o}} → m % o ≡ n % o → m ≤ n → m ≲%[ o ] n
≡[o]%⇒≲%[o] : .{{_ : NonZero o}} → m ≡%[ o ] n → m ≤ n → m ≲%[ o ] n
≡[o]%⇒≅%[o] : .{{_ : NonZero o}} → _≡%[ o ]_ ⇒ _≅%[ o ]_

≡%-suc-injective : .{{_ : NonZero o}} → Injective _≡%[ o ]_ _≡%[ o ]_ suc
Expand Down Expand Up @@ -595,6 +596,19 @@ Additions to existing modules
padRight m≤n x (updateAt xs i f)
```

* In `Data.Vec.Relation.Binary.Pointwise.Inductive`
```agda
irrelevant : ∀ {_∼_ : REL A B ℓ} {n m} → Irrelevant _∼_ → Irrelevant (Pointwise _∼_ {n} {m})
antisym : ∀ {P : REL A B ℓ₁} {Q : REL B A ℓ₂} {R : REL A B ℓ} {m n} →
Antisym P Q R → Antisym (Pointwise P {m}) (Pointwise Q {n}) (Pointwise R)
```

* In `Data.Vec.Relation.Binary.Pointwise.Extensional`
```agda
antisym : ∀ {P : REL A B ℓ₁} {Q : REL B A ℓ₂} {R : REL A B ℓ} {n} →
Antisym P Q R → Antisym (Pointwise P {n}) (Pointwise Q) (Pointwise R)
```

* In `Relation.Binary.Construct.Add.Extrema.NonStrict`:
```agda
≤±-respˡ-≡ : _≤±_ Respectsˡ _≡_
Expand Down Expand Up @@ -633,19 +647,6 @@ Additions to existing modules
on⁻ : SymClosure (R on g) ⇒ ((SymClosure R) on g)
```

* In `Data.Vec.Relation.Binary.Pointwise.Inductive`
```agda
irrelevant : ∀ {_∼_ : REL A B ℓ} {n m} → Irrelevant _∼_ → Irrelevant (Pointwise _∼_ {n} {m})
antisym : ∀ {P : REL A B ℓ₁} {Q : REL B A ℓ₂} {R : REL A B ℓ} {m n} →
Antisym P Q R → Antisym (Pointwise P {m}) (Pointwise Q {n}) (Pointwise R)
```

* In `Data.Vec.Relation.Binary.Pointwise.Extensional`
```agda
antisym : ∀ {P : REL A B ℓ₁} {Q : REL B A ℓ₂} {R : REL A B ℓ} {n} →
Antisym P Q R → Antisym (Pointwise P {n}) (Pointwise Q) (Pointwise R)
```

* In `Relation.Binary.Properties.Setoid`:
```agda
¬[x≉x] : .(x ≉ x) → Whatever
Expand Down Expand Up @@ -678,20 +679,16 @@ Additions to existing modules
⟨_⟩⊢⁺_ : P ⊆ f ⊢ Q → ⟨ f ⟩⊢ P ⊆ Q
[_]⊢⁻_ : Q ⊆ [ f ]⊢ P → f ⊢ Q ⊆ P
[_]⊢⁺_ : f ⊢ Q ⊆ P → Q ⊆ [ f ]⊢ P
```

* In `System.Random`:
```agda
randomIO : IO Bool
randomRIO : RandomRIO {A = Bool} _≤_
```

* In Relation.Unary.Properites
```agda
¬∃⟨P⟩⇒Π[∁P] : ¬ ∃⟨ P ⟩ → Π[ ∁ P ]
¬∃⟨P⟩⇒∀[∁P] : ¬ ∃⟨ P ⟩ → ∀[ ∁ P ]
∃⟨∁P⟩⇒¬Π[P] : ∃⟨ ∁ P ⟩ → ¬ Π[ P ]
∃⟨∁P⟩⇒¬∀[P] : ∃⟨ ∁ P ⟩ → ¬ ∀[ P ]
Π[∁P]⇒¬∃[P] : Π[ ∁ P ] → ¬ ∃⟨ P ⟩
∀[∁P]⇒¬∃[P] : ∀[ ∁ P ] → ¬ ∃⟨ P ⟩
```

* In `System.Random`:
```agda
randomIO : IO Bool
randomRIO : RandomRIO {A = Bool} _≤_
```
2 changes: 1 addition & 1 deletion src/Data/Nat/DivMod.agda
Original file line number Diff line number Diff line change
Expand Up @@ -496,7 +496,7 @@ module _ .{{_ : NonZero o}} where
≅%[o]⇒≡[o]% : _≅%[ o ]_ ⇒ _≡%[ o ]_
≅%[o]⇒≡[o]% = SymClosure.fold sym ≲%[o]⇒≡[o]%

≡[o]%⇒≲%[o] : m % o ≡ n % o → m ≤ n → m ≲%[ o ] n
≡[o]%⇒≲%[o] : m ≡%[ o ] n → m ≤ n → m ≲%[ o ] n

Copy link
Copy Markdown
Collaborator Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Purely cosmetic, but this lemma statement hadn't been rewritten to use the new definition of the relation _≡%[ o ]_, so fixed on the CHANGELOG, and here. 🤦

≡[o]%⇒≲%[o] {m = m} {n = n} eq m≤n = k , (begin-equality
n ≡⟨ m≡m%n+[m/n]*n n o ⟩
n % o + n / o * o ≡⟨ cong (_+ n / o * o) eq ⟨
Expand Down
Loading