law drop_append_l

lawful-bytes@0.1.1.0 · proof_fast_find.bend:87

import Base

87law drop_append_l:
88  for +xs: List<&2, U32>
89  for +ys: List<&2, U32>
90  for +o: Nat
91  for +h: {Nat.is_le(o, List.length(&2, U32, xs)) == True{} : Bool}
92  {List.drop(&2, U32, List.append(&2, U32, xs, ys), o) == List.append(&2, U32, List.drop(&2, U32, xs, o), ys) : List<&2, U32>}