def lists_012

bendtorch-core@0.1.0.0 · src/tensor/axis_algebra.bend:452

import Base

452def lists_012(-A: Data, +items: List<&2, A>, length: {List.length(&2, A, items) == 3n : Nat}) -> ListFacts<A, 3n, [0n, 1n, 2n], items>:
453  match items:
454    case Nil{}:
455      Empty.absurd(ListFacts<A, 3n, [0n, 1n, 2n], Nil{}>, nat_clash(0n, 3n, length, {==}))
456    case +x0 <> Nil{}:
457      Empty.absurd(ListFacts<A, 3n, [0n, 1n, 2n], x0 <> Nil{}>, nat_clash(1n, 3n, length, {==}))
458    case +x0 <> +x1 <> Nil{}:
459      Empty.absurd(ListFacts<A, 3n, [0n, 1n, 2n], x0 <> x1 <> Nil{}>, nat_clash(2n, 3n, length, {==}))
460    case +x0 <> +x1 <> +x2 <> Nil{}:
461      Lists{{==}, {==}, {==}, {==}, {==}, {==}}
462    case +x0 <> +x1 <> +x2 <> +x3 <> +tail:
463      Empty.absurd(ListFacts<A, 3n, [0n, 1n, 2n], x0 <> x1 <> x2 <> x3 <> tail>, nat_clash(4n+List.length(&2, A, tail), 3n, length, {==}))