Core.Aligned: def of bendtorch-core@0.1.0.0
Import: import bendtorch-core@0.1.0.0/src/shape/core.bend as Core
Lines 237-254 of bendtorch-core@0.1.0.0/src/shape/core.bend: https://jend.leeeet.dev/read.txt?path=bendtorch-core@0.1.0.0/src/shape/core.bend&start_line=237&end_line=254

import Base

def Aligned(left: List<&2, Nat>, right: List<&2, Nat>, output: List<&2, Nat>) -> Data:
  match left right output:
    case Nil{} Nil{} Nil{}:
      Unit
    case lh <> lt rh <> rt oh <> ot:
      Aligned.Step<lh, lt, rh, rt, oh, ot>
    case Nil{} Nil{} oh <> ot:
      Empty
    case Nil{} rh <> rt Nil{}:
      Empty
    case lh <> lt Nil{} Nil{}:
      Empty
    case Nil{} rh <> rt oh <> ot:
      Empty
    case lh <> lt Nil{} oh <> ot:
      Empty
    case lh <> lt rh <> rt 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/core.bend&name=Aligned.Step