law take_append_l

lawful-bytes@0.1.1.0 · proof_seq.bend:102

import Base

102law take_append_l:
103  for +xs: List<&2, U32>
104  for +ys: List<&2, U32>
105  for +n: Nat
106  for +h: {Nat.is_le(n, List.length(&2, U32, xs)) == True{} : Bool}
107  {List.take(&2, U32, List.append(&2, U32, xs, ys), n) == List.take(&2, U32, xs, n) : List<&2, U32>}