CoordinateProofs.Fits: def of bendtorch-core@0.1.0.0
Import: import bendtorch-core@0.1.0.0/src/shape/coordinate_proofs.bend as CoordinateProofs
Lines 10-19 of bendtorch-core@0.1.0.0/src/shape/coordinate_proofs.bend: https://jend.leeeet.dev/read.txt?path=bendtorch-core@0.1.0.0/src/shape/coordinate_proofs.bend&start_line=10&end_line=19

import Base

def Fits(dims: List<&2, Nat>, values: List<&2, Nat>) -> Data:
  match dims values:
    case Nil{} Nil{}:
      Unit
    case dh <> dt vh <> vt:
      Fits.Step<dh, dt, vh, vt>
    case Nil{} vh <> vt:
      Empty
    case dh <> dt Nil{}:
      Empty

Uses (5):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Empty
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Unit
  https://jend.leeeet.dev/definition.txt?path=bendtorch-core@0.1.0.0/src/shape/coordinate_proofs.bend&name=Fits.Step