law reverse_append
import bend-mathlib@0.8.1.0/list.bend as Listimport Base
94# Reversing an append reverses and swaps the parts: reverse (xs ++ ys) = reverse ys ++ reverse xs.
95law reverse_append:
96 for -a: Quant
97 for -A: Kind(a)
98 for xs: List<a, A>
99 for ys: List<a, A>
100 {List.reverse(a, A, List.append(a, A, xs, ys)) == List.append(a, A, List.reverse(a, A, ys), List.reverse(a, A, xs)) : List<a, A>}