------------------------------------------------------------------------
-- The Agda standard library
--
-- Type constructors giving rise to a semigroup at every type
-- e.g. (List, _++_)
------------------------------------------------------------------------
{-# OPTIONS --cubical-compatible --safe #-}
module Effect.Choice where
open import Level
private
variable
ℓ ℓ′ : Level
A : Set ℓ
record RawChoice (F : Set ℓ → Set ℓ′) : Set (suc ℓ ⊔ ℓ′) where
infixr 3 _<|>_ _∣_
field
_<|>_ : F A → F A → F A
-- backwards compatibility: unicode variants
_∣_ : F A → F A → F A
_∣_ = _<|>_
RetroSearch is an open source project built by @garambo | Open a GitHub Issue
Search and Browse the WWW like it's 1997 | Search results from DuckDuckGo
HTML:
3.2
| Encoding:
UTF-8
| Version:
0.7.4