{-# OPTIONS --cubical-compatible #-}
module Terra.Data.Counit where
open import Terra.Data.Level
private
  variable
     : Level

data  : Set where
  -- rien

⊥-elim : {T : Set } ->  -> T
⊥-elim ()

absurd : {A : Set } ->  -> A
absurd ()