(CommandList
  children: [
    (If
      arms: [
        (if_arm
          cond: [
            (Sentence
              child: (C {(test)} {($ VSub_Pound '$#')} {(KW_Bang '!') (Lit_Other '=')} {(1)})
              terminator: <Op_Semi ';'>
            )
          ]
          action: [
            (C {(echo)} {(SQ <'? expected a single filename'>)})
            (ControlFlow token:<ControlFlow_Exit exit> arg_word:{(1)})
          ]
          spids: [16777215 119]
        )
      ]
      spids: [16777215 133]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:COL)
          op: Equal
          rhs: {(col) ($ VSub_Dollar '$$')}
          spids: [136]
        )
      ]
      spids: [136]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:INPUT)
          op: Equal
          rhs: {(input) ($ VSub_Dollar '$$')}
          spids: [140]
        )
      ]
      spids: [140]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:UPPER)
          op: Equal
          rhs: {(upper) ($ VSub_Dollar '$$')}
          spids: [144]
        )
      ]
      spids: [144]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:SCRIPT)
          op: Equal
          rhs: {(script) ($ VSub_Dollar '$$')}
          spids: [148]
        )
      ]
      spids: [148]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:RESULT)
          op: Equal
          rhs: {(result) ($ VSub_Dollar '$$')}
          spids: [152]
        )
      ]
      spids: [152]
    )
    (C {(rm)} {(-f)} {($ VSub_Name '$UPPER')} {($ VSub_Name '$SCRIPT')} {($ VSub_Name '$RESULT')})
    (C {(trap)} 
      {
        (DQ ('rm -f ') ($ VSub_Name '$COL') ('.* ') ($ VSub_Name '$INPUT') (' ') ($ VSub_Name '$UPPER') 
          (' ') ($ VSub_Name '$SCRIPT') (' ') ($ VSub_Name '$RESULT')
        )
      } {(0)} {(1)} {(2)} {(5)} {(15)}
    )
    (Pipeline
      children: [
        (C {(fgrep)} {(-v)} {(EscapedLiteralPart token:<Lit_EscapedChar '\\#'>)} {($ VSub_Number '$1')})
        (SimpleCommand
          words: [{(sed)} {(-e)} {(SQ <'s/[\t][\t]*/\t/g'>)}]
          redirects: [
            (Redir
              op_id: Redir_Great
              fd: 16777215
              arg_word: {($ VSub_Name '$INPUT')}
              spids: [210]
            )
          ]
        )
      ]
      negated: F
    )
    (ForEach
      iter_name: F
      iter_words: [{(1)} {(2)} {(3)} {(4)}]
      do_arg_iter: F
      body: 
        (DoGroup
          children: [
            (Pipeline
              children: [
                (C {(sed)} {(-e)} {(SQ <'s/\\./\t/g'>)} {($ VSub_Name '$INPUT')})
                (SimpleCommand
                  words: [{(cut)} {(-f)} {($ VSub_Name '$F')}]
                  redirects: [
                    (Redir
                      op_id: Redir_Great
                      fd: 16777215
                      arg_word: {($ VSub_Name '$COL') (.) ($ VSub_Name '$F')}
                      spids: [249]
                    )
                  ]
                )
              ]
              negated: F
            )
          ]
          spids: [228 255]
        )
      spids: [219 16777215]
    )
    (ForEach
      iter_name: F
      iter_words: [{(2)} {(4)}]
      do_arg_iter: F
      body: 
        (DoGroup
          children: [
            (SimpleCommand
              words: [{(tr)} {(abcdefghijklmnopqrstuvwxyz)} {(ABCDEFGHIJKLMNOPQRSTUVWXYZ)}]
              redirects: [
                (Redir
                  op_id: Redir_Less
                  fd: 16777215
                  arg_word: {($ VSub_Name '$COL') (.) ($ VSub_Name '$F')}
                  spids: [276]
                )
                (Redir
                  op_id: Redir_Great
                  fd: 16777215
                  arg_word: {($ VSub_Name '$UPPER')}
                  spids: [281]
                )
              ]
            )
            (C {(mv)} {($ VSub_Name '$UPPER')} {($ VSub_Name '$COL') (.) ($ VSub_Name '$F')})
          ]
          spids: [267 294]
        )
      spids: [262 16777215]
    )
    (Pipeline
      children: [
        (C {(paste)} {($ VSub_Name '$COL') (.) (Lit_Other '*')})
        (SimpleCommand
          words: [{(sed)} {(-e)} {(SQ <'s/^/s\\/\\\\</'>)} {(-e)} {(SQ <'s/$/\\//'>)}]
          redirects: [
            (Redir
              op_id: Redir_Great
              fd: 16777215
              arg_word: {($ VSub_Name '$UPPER')}
              spids: [321]
            )
          ]
        )
      ]
      negated: F
    )
    (SimpleCommand
      words: [{(echo)} {(DQ ('# Do the TH lines'))}]
      redirects: [
        (Redir op_id:Redir_DGreat fd:16777215 arg_word:{($ VSub_Name '$RESULT')} spids:[331])
      ]
    )
    (SimpleCommand
      words: [
        {(sed)}
        {(-e)}
        {(SQ <'s/\\//\\/TH /'>)}
        {(-e)}
        {(SQ <'s/\t/ /'>)}
        {(-e)}
        {(SQ <'s/\t/ ""\\/TH /'>)}
        {(-e)}
        {(SQ <'s/\t/ /'>)}
        {(-e)}
        {(SQ <'s/\\/$/ ""\\//'>)}
        {($ VSub_Name '$UPPER')}
      ]
      redirects: [
        (Redir op_id:Redir_DGreat fd:16777215 arg_word:{($ VSub_Name '$RESULT')} spids:[378])
      ]
    )
    (SimpleCommand
      words: [{(echo)} {(DQ ('# Do the embedded references'))}]
      redirects: [
        (Redir op_id:Redir_DGreat fd:16777215 arg_word:{($ VSub_Name '$RESULT')} spids:[388])
      ]
    )
    (SimpleCommand
      words: [
        {(sed)}
        {(-e)}
        {(SQ <'s/</<fB/'>)}
        {(-e)}
        {(SQ <'s/\t/\\\\\\\\fR(/'>)}
        {(-e)}
        {(SQ <'s/\t/)\\/fB/'>)}
        {(-e)}
        {(SQ <'s/\t/\\\\\\\\fR(/'>)}
        {(-e)}
        {(SQ <'s/\\/$/)\\//'>)}
        {($ VSub_Name '$UPPER')}
      ]
      redirects: [
        (Redir op_id:Redir_DGreat fd:16777215 arg_word:{($ VSub_Name '$RESULT')} spids:[435])
      ]
    )
    (SimpleCommand
      words: [
        {(echo)}
        {
          (DQ ('# Do the ') (Lit_Other '\\') (fBxxx) (Lit_Other '\\') 
            ('fR references in the .NAME section')
          )
        }
      ]
      redirects: [
        (Redir op_id:Redir_DGreat fd:16777215 arg_word:{($ VSub_Name '$RESULT')} spids:[449])
      ]
    )
    (SimpleCommand
      words: [
        {(sed)}
        {(-e)}
        {(SQ <'s/\\\\</^\\\\\\\\fB/'>)}
        {(-e)}
        {(SQ <'s/\t[^\t]*\t/\\\\\\\\f[RP] -\\/\\\\\\\\fB/'>)}
        {(-e)}
        {(SQ <'s/\t.*$/\\\\\\\\fR -\\//'>)}
        {($ VSub_Name '$UPPER')}
      ]
      redirects: [
        (Redir op_id:Redir_DGreat fd:16777215 arg_word:{($ VSub_Name '$RESULT')} spids:[480])
      ]
    )
    (C {(cat)} {($ VSub_Name '$RESULT')})
  ]
)