Pdb.atom_lines_go: def of bend-prot@0.1.0.0
Import: import bend-prot@0.1.0.0/pdb.bend as Pdb
Lines 43-57 of bend-prot@0.1.0.0/pdb.bend: https://jend.leeeet.dev/read.txt?path=bend-prot@0.1.0.0/pdb.bend&start_line=43&end_line=57

import Base

# ATOM lines up to (excluding) the first ENDMDL. Decided by matching the
# first six characters literally, so no computed Bool is ever matched.
# Tail-recursive over lines for the same stack reason as tlines.
def atom_lines_go(lines: List<&2, String>, acc: List<&2, String>) -> List<&2, String>:
  match lines:
    case Nil{}:
      List.reverse(&2, String, acc)
    case h <> t:
      match h:
        case SCon{'E', SCon{'N', SCon{'D', SCon{'M', SCon{'D', SCon{'L', _}}}}}}:
          List.reverse(&2, String, acc)
        case SCon{'A', SCon{'T', SCon{'O', SCon{'M', SCon{' ', SCon{' ', _}}}}}}:
          atom_lines_go(t, h <> acc)
        case _:
          atom_lines_go(t, acc)

Uses (8):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Char
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List.reverse
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=String
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Word.Con
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Word.Nil