def internal_foldr_reverse_go
bend-mathlib@0.8.1.0 · list.bend:1960
import bend-mathlib@0.8.1.0/list.bend as List
import Base
1960def internal_foldr_reverse_go(~a: Quant, ~A: Kind(a), ~B: Type, ~f: A -> B -> B, xs: List<a, A>, -acc: List<a, A>, -z: B) -> {List.foldr(~a, ~A, ~B, ~f, List.reverse.go(a, A, xs, acc), z) == List.foldl(~a, ~A, ~B, ~(x => y => f(y, x)), xs, List.foldr(~a, ~A, ~B, ~f, acc, z)) : B}:
1961 match xs:
1962 case Nil{}:
1963 {==}
1964 case h <> t:
1965 internal_foldr_reverse_go(~a, ~A, ~B, ~f, t, h <> acc, z)