law head_reverse
import bend-mathlib@0.8.1.0/list.bend as Listimport Base
1800# The head of the reverse is the last element.
1801law head_reverse:
1802 for -a: Quant
1803 for -A: Kind(a)
1804 for xs: List<a, A>
1805 {List.head(a, A, List.reverse(a, A, xs)) == List.last(a, A, xs) : Maybe<a, A>}