law ja_go

lawful-fields@0.1.1.0 · proof_list.bend:280

import Base
import lawful-fields@0.1.1.0/defs.bend as F

280law ja_go:
281  for +t: List<&2, List<&2, U32>>
282  for +sep: U32
283  for +k: Nat
284  for +h: {Nat.is_lt(Nat.add(k, 1n), List.length(&2, List<&2, U32>, t)) == True{} : Bool}
285  {F.join.go(t, sep) == List.append(&2, U32, F.join.go(List.take(&2, List<&2, U32>, t, Nat.add(k, 1n)), sep), sep <> F.join(List.drop(&2, List<&2, U32>, t, Nat.add(k, 1n)), sep)) : List<&2, U32>}