    ------------------------------------------------------------------------
    -- The Agda standard library
    --
    -- Instances for booleans
    ------------------------------------------------------------------------

    {-# OPTIONS --cubical-compatible --safe #-}

    module Data.Bool.Instances where

    open import Data.Bool.Properties using (_≟_; ≤-isDecTotalOrder)
    open import Relation.Binary.PropositionalEquality.Properties
      using (isDecEquivalence)

    instance
      Bool-≡-isDecEquivalence = isDecEquivalence _≟_
      Bool-≤-isDecTotalOrder = ≤-isDecTotalOrder