def reverse_shift
import qasim-bend-kit@0.1.0.2/proof/JSON_ListProof.bend as JSONListProofimport Base
19def reverse_shift(-A: Data,
20 +xs: List<&2, A>,
21 +acc: List<&2, A>,
22 +tail: List<&2, A>) -> {List.reverse.go(&2, A, List.reverse.go(&2, A, xs, acc), tail) == List.reverse.go(&2, A, acc, List.append(&2, A, xs, tail)) : List<&2, A>}:
23 match xs:
24 case Nil{}: {==}
25 case h <> t: reverse_shift(A, t, h <> acc, tail)