------------------------------------------------------------------------
-- The Agda standard library
--
-- Argument relevance used in the reflection machinery
------------------------------------------------------------------------
{-# OPTIONS --cubical-compatible --safe #-}
module Reflection.AST.Argument.Relevance where
open import Relation.Nullary.Decidable.Core using (yes; no)
open import Relation.Binary.Definitions using (DecidableEquality)
open import Relation.Binary.PropositionalEquality.Core using (refl)
------------------------------------------------------------------------
-- Re-exporting the builtins publicly
open import Agda.Builtin.Reflection public using (Relevance)
open Relevance public
------------------------------------------------------------------------
-- Decidable equality
infix 4 _≟_
_≟_ : DecidableEquality Relevance
relevant ≟ relevant = yes refl
irrelevant ≟ irrelevant = yes refl
relevant ≟ irrelevant = no λ()
irrelevant ≟ relevant = no λ()
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