get("#137") -- split
get("#349") -- table functions
get("#350") -- RecogUtil 2

function make_sig2letter()
  -- first, signatures from alphabet (#1000080), then additional
  -- signatures for slightly varying instances, e.g. from #1000082
  sigs = "121-1212 1321-12121 121-12121 121-121 1321-1 12-1 12321-12121 1-212 1-1 121-121 121-212 1-1 1-2343 1-232 121-121 121-121 12321-12121 12321-1212 12321-12121 1-1 1-21 12121-56787865 1-21 12321-1 12121-212 132321-12121"
  letters = {"A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "VWX", "Y", "Z",
    "X", "B"}
  
  sigs = split(sigs, " ")
  sig2letter = {}
  
  for i=1, #sigs do
    sig = sigs[i]
    if sig2letter[sig] == nil then sig2letter[sig] = {} end
    table.insert(sig2letter[sig], letters[i])
  end
end

-- [ILT][ILT]N[UY]?RA[ILT]NCANREA[DPOJ] :)

function fix(segidx, letters)
  local part = parts[segidx]
  local x1, y1, x2, y2 = unpack(split(part, ", "))
  local w, h = x2-x1, y2-y1
    
  local let = valuestokeys(letters)
  
  local cropped = {
    width = w,
    height = h,
    getInt = function(x, y)
      return img.getInt(x+x1, y+y1)
    end
  }
  
  -- distinguish I and T by width
  if let["I"] and let["T"] then
    local ratio = w/h
    let[ratio >= 0.5 and "I" or "T"] = nil
  end
  
  if let["T"] and let["L"] then
    let[upperToLowerWidth(cropped) < 1 and "T" or "L"] = nil
  end
  
  if let["I"] and let["L"] then
    let[upperToLowerWidth(cropped) <= 0.5 and "I" or "L"] = nil
  end
  
  if let["U"] and let["Y"] then
    local middleY = math.ceil(h/2)
    local middleWidth = getWidth(cropped, middleY)
    --[[local _x2 = getRightmostPoint(cropped, middleY)
    local _x1 = getLeftmostPoint(cropped, middleY)
    print("crop: ", x1, y1, x2, y2)
    print("middleWidth: "..middleWidth..", w: "..w..", middleY: "..middleY..", _x2: ".._x2..", _x1: ".._x1)
    for x=0, cropped.width-1 do
      print(cropped.getInt(x, middleY))
    end]]
    let[middleWidth/w <= 0.5 and "U" or "Y"] = nil
  end

  if let["D"] and let["P"] then
    local upper = upperMaxWidth(cropped)
    local lower = lowerMaxWidth(cropped)
    print("upper", upper, "lower", lower)
    let[upper/lower >= 2 and "D" or "P"] = nil
  end
  
  if let["D"] and let["O"] then
    --local gx, gy = getCenterOfGravity(cropped)
    --print("gx", gx, "w", w)
    --let[gx >= w*0.4 and "D" or "O"] = nil
    local avgLeft = getAverageLeft(cropped)
    print("D/O: avgLeft/w", avgLeft/w)
    let[avgLeft/w >= 0.05 and "D" or "O"] = nil
  end
  
  if (let["D"] or let["O"]) and let["J"] then
    local avgLeft = getAverageLeft(cropped, math.floor(h*0.33), math.floor(h*0.6))
    print("D/O vs J: avgLeft/w", avgLeft/w)
    if avgLeft/w >= 0.5 then
      let["D"], let["O"] = nil, nil
    else
      let["J"] = nil
    end
  end
  
  letters = keystolist(let)
  return letters
end

make_sig2letter()

result = otherresults["#345"] or error("Need result of #345")
_, _, s = string.find(result, ": (.+)")
if s == nil then return end
parts = split(s, "|")

-- could also recalc this from parts
segments = otherresults["#340"] or error("Need result of #340")
sigs = otherresults["#340"] or error("Need result of #340")
sigs = split(sigs, " ")

result = {}

for i=1, #sigs do
  sig = sigs[i]
  letters = sig2letter[sig]
  s = ""
  if letters == nil then
    print("Unknown signature: "..sig)
    s = "?"
  else
    if #letters > 1 then
      letters = fix(i, letters)
    end
    if #letters == 1 then
      s = letters[1]
    else
      s = "["..table.concat(letters, "").."]"
    end
  end
  table.insert(result, s)
end

return table.concat(result, "")