def lists_2013

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

import Base

1430def lists_2013(-A: Data, +items: List<&2, A>, length: {List.length(&2, A, items) == 4n : Nat}) -> ListFacts<A, 4n, [2n, 0n, 1n, 3n], items>:
1431  match items:
1432    case Nil{}:
1433      Empty.absurd(ListFacts<A, 4n, [2n, 0n, 1n, 3n], Nil{}>, nat_clash(0n, 4n, length, {==}))
1434    case +x0 <> Nil{}:
1435      Empty.absurd(ListFacts<A, 4n, [2n, 0n, 1n, 3n], x0 <> Nil{}>, nat_clash(1n, 4n, length, {==}))
1436    case +x0 <> +x1 <> Nil{}:
1437      Empty.absurd(ListFacts<A, 4n, [2n, 0n, 1n, 3n], x0 <> x1 <> Nil{}>, nat_clash(2n, 4n, length, {==}))
1438    case +x0 <> +x1 <> +x2 <> Nil{}:
1439      Empty.absurd(ListFacts<A, 4n, [2n, 0n, 1n, 3n], x0 <> x1 <> x2 <> Nil{}>, nat_clash(3n, 4n, length, {==}))
1440    case +x0 <> +x1 <> +x2 <> +x3 <> Nil{}:
1441      Lists{{==}, {==}, {==}, {==}, {==}, {==}}
1442    case +x0 <> +x1 <> +x2 <> +x3 <> +x4 <> +tail:
1443      Empty.absurd(ListFacts<A, 4n, [2n, 0n, 1n, 3n], x0 <> x1 <> x2 <> x3 <> x4 <> tail>, nat_clash(5n+List.length(&2, A, tail), 4n, length, {==}))