Doctor.joint: def of ezx@1.11.0.0
Import: import ezx@1.11.0.0/src/ws/doctor.bend as Doctor
Lines 35-45 of ezx@1.11.0.0/src/ws/doctor.bend: https://jend.leeeet.dev/read.txt?path=ezx@1.11.0.0/src/ws/doctor.bend&start_line=35&end_line=45

import Base
import ezx@1.11.0.0/src/ledger/render.bend as Rend
import ezx@1.11.0.0/src/ws/joint.bend as J

# what the doctor judges at a workspace root: the joint ledger, the same text
# `ez lock` plans the root lock from, or, when it cannot be made, the root's
# own ledger with why
def joint(jj: J.Joint, +text: String, +fs: List<&2, J.Found>) -> Doctored:
  match jj:
    case J.Lone{}:
      Doctored{Some{text}, Alone{}}
    case J.Clash{why}:
      Doctored{Some{text}, Back{text, fs, why}}
    case J.Joint{mm}:
      Doctored{Some{Rend.show(mm)}, Back{text, fs, ""}}

Uses (8):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Maybe
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=String
  https://jend.leeeet.dev/definition.txt?path=ezx@1.11.0.0/src/ledger/render.bend&name=show
  https://jend.leeeet.dev/definition.txt?path=ezx@1.11.0.0/src/ws/doctor.bend&name=Back
  https://jend.leeeet.dev/definition.txt?path=ezx@1.11.0.0/src/ws/doctor.bend&name=Doctored
  https://jend.leeeet.dev/definition.txt?path=ezx@1.11.0.0/src/ws/joint.bend&name=Found
  https://jend.leeeet.dev/definition.txt?path=ezx@1.11.0.0/src/ws/joint.bend&name=Joint