module univTypes.Util.Fin where

open import Data.Nat using (ℕ; suc; zero)

-- `Fin n` is a type with `n` elements.
-- You can think of `Fin n` as the type of all natural numbers less than `n`.

data Fin : ℕ → Set where
  zero : ∀ {n} → Fin (suc n)
  suc  : ∀ {n} → (i : Fin n) → Fin (suc n)