/Prelude-v22.0.0/NonEmpty/singleton.dhall

Copy path to clipboard

Create a NonEmpty list with just one element

Examples

singleton Natural 2 ≡ { head = 2, tail = [] : List Natural }

Source

--| Create a `NonEmpty` list with just one element
let NonEmpty =
./Type.dhall sha256:e2e247455a858317e470e0e4affca8ac07f9f130570ece9cb7ac1f4ea3deb87f
? ./Type.dhall

let singleton
: ∀(a : Type) → a → NonEmpty a
= λ(a : Type) → λ(x : a) → { head = x, tail = [] : List a }

let example =
assert : singleton Natural 2 ≡ { head = 2, tail = [] : List Natural }

in singleton