Skip to content

Commit

Permalink
chore: bump
Browse files Browse the repository at this point in the history
  • Loading branch information
plt-amy committed Nov 13, 2024
1 parent 6032c6b commit dfb9f82
Show file tree
Hide file tree
Showing 4 changed files with 7 additions and 7 deletions.
4 changes: 2 additions & 2 deletions src/1Lab/Membership.agda
Original file line number Diff line number Diff line change
Expand Up @@ -21,7 +21,7 @@ record Membership {ℓ ℓe} (A : Type ℓe) (ℙA : Type ℓ) ℓm : Type (ℓ
infix 30 _∈_

open Membership ⦃ ... ⦄ using (_∈_) public
{-# DISPLAY Membership._∈_ i a b = a ∈ b #-}
{-# DISPLAY Membership._∈_ _ a b = a ∈ b #-}

-- The prototypical instance is given by functions into a universe:

Expand Down Expand Up @@ -65,7 +65,7 @@ record Inclusion {ℓ} (ℙA : Type ℓ) ℓi : Type (ℓ ⊔ lsuc (ℓi)) where
infix 30 _⊆_

open Inclusion ⦃ ... ⦄ using (_⊆_) public
{-# DISPLAY Inclusion._⊆_ i a b = a ⊆ b #-}
{-# DISPLAY Inclusion._⊆_ _ a b = a ⊆ b #-}

instance
Inclusion-default
Expand Down
4 changes: 2 additions & 2 deletions src/1Lab/Underlying.agda
Original file line number Diff line number Diff line change
Expand Up @@ -23,7 +23,7 @@ open Underlying using (ℓ-underlying)
-- Workaround for Agda bug https://github.com/agda/agda/issues/6588 —
-- the principal (instance) argument is reified as visible, so we can
-- drop it using a display form.
{-# DISPLAY Underlying.⌞_⌟ f x = ⌞ x ⌟ #-}
{-# DISPLAY Underlying.⌞_⌟ _ x = ⌞ x ⌟ #-}

instance
-- For universes, we use the standard notion of "underlying type".
Expand Down Expand Up @@ -79,7 +79,7 @@ record Funlike {ℓ ℓ' ℓ''} (A : Type ℓ) (arg : Type ℓ') (out : arg →
infixl 999 _#_

open Funlike ⦃ ... ⦄ using (_#_) public
{-# DISPLAY Funlike._#_ p f x = f # x #-}
{-# DISPLAY Funlike._#_ _ f x = f # x #-}

-- Sections of the _#_ operator tend to be badly-behaved since they
-- introduce an argument x : ⌞ ?0 ⌟ whose Underlying instance meta
Expand Down
2 changes: 1 addition & 1 deletion src/Meta/Brackets.lagda.md
Original file line number Diff line number Diff line change
Expand Up @@ -25,5 +25,5 @@ record ⟦⟧-notation {ℓ} (A : Type ℓ) : Typeω where
⟦_⟧ : A Sem

open ⟦⟧-notation ⦃...⦄ using (⟦_⟧) public
{-# DISPLAY ⟦⟧-notation.⟦_⟧ f x = ⟦ x ⟧ #-}
{-# DISPLAY ⟦⟧-notation.⟦_⟧ _ x = ⟦ x ⟧ #-}
```
4 changes: 2 additions & 2 deletions support/nix/dep/Agda/github.json
Original file line number Diff line number Diff line change
Expand Up @@ -3,6 +3,6 @@
"repo": "agda",
"branch": "master",
"private": false,
"rev": "11e54c0e0229996c22ed7b53a50694933de84b09",
"sha256": "12avpyxdlh7w7p9gsv5p4499c01qk3k1mklwfp8shljmb8z8cwd4"
"rev": "14099b47e5cb2afb31cdbe511615501147e4b23a",
"sha256": "009k829zqyp4yg4xz8a6syhibpgnwprl605icrs4dgxppi6cw5z2"
}

0 comments on commit dfb9f82

Please sign in to comment.