10 lines
259 B
Text
10 lines
259 B
Text
--| Retrieve the last element of the list
|
|
let last
|
|
: ∀(a : Type) → List a → Optional a
|
|
= List/last
|
|
|
|
let example0 = assert : last Natural [ 0, 1, 2 ] ≡ Some 2
|
|
|
|
let example1 = assert : last Natural ([] : List Natural) ≡ None Natural
|
|
|
|
in last
|