AxisAlgebra.lists_210: def of bendtorch-core@0.1.0.0
Import: import bendtorch-core@0.1.0.0/src/tensor/axis_algebra.bend as AxisAlgebra
Lines 697-708 of bendtorch-core@0.1.0.0/src/tensor/axis_algebra.bend: https://jend.leeeet.dev/read.txt?path=bendtorch-core@0.1.0.0/src/tensor/axis_algebra.bend&start_line=697&end_line=708

import Base

def lists_210(-A: Data, +items: List<&2, A>, length: {List.length(&2, A, items) == 3n : Nat}) -> ListFacts<A, 3n, [2n, 1n, 0n], items>:
  match items:
    case Nil{}:
      Empty.absurd(ListFacts<A, 3n, [2n, 1n, 0n], Nil{}>, nat_clash(0n, 3n, length, {==}))
    case +x0 <> Nil{}:
      Empty.absurd(ListFacts<A, 3n, [2n, 1n, 0n], x0 <> Nil{}>, nat_clash(1n, 3n, length, {==}))
    case +x0 <> +x1 <> Nil{}:
      Empty.absurd(ListFacts<A, 3n, [2n, 1n, 0n], x0 <> x1 <> Nil{}>, nat_clash(2n, 3n, length, {==}))
    case +x0 <> +x1 <> +x2 <> Nil{}:
      Lists{{==}, {==}, {==}, {==}, {==}, {==}}
    case +x0 <> +x1 <> +x2 <> +x3 <> +tail:
      Empty.absurd(ListFacts<A, 3n, [2n, 1n, 0n], x0 <> x1 <> x2 <> x3 <> tail>, nat_clash(4n+List.length(&2, A, tail), 3n, length, {==}))

Uses (6):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Empty.absurd
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List.length
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=bendtorch-core@0.1.0.0/src/tensor/axis_algebra.bend&name=ListFacts
  https://jend.leeeet.dev/definition.txt?path=bendtorch-core@0.1.0.0/src/tensor/axis_algebra.bend&name=nat_clash