(command.CommandList
  children: [
    (command.Simple
      blame_tok: <source>
      more_env: []
      words: [
        {<source>}
        {
          (CommandSub
            left_token: <Id.Left_DollarParen '$('>
            child: 
              (command.Simple
                blame_tok: <dirname>
                more_env: []
                words: [{<dirname>} {($ Id.VSub_Number 0)}]
                redirects: []
                do_fork: T
              )
            right: <Id.Eof_RParen _>
          ) <'/reader.sh'>
        }
      ]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <source>
      more_env: []
      words: [
        {<source>}
        {
          (CommandSub
            left_token: <Id.Left_DollarParen '$('>
            child: 
              (command.Simple
                blame_tok: <dirname>
                more_env: []
                words: [{<dirname>} {($ Id.VSub_Number 0)}]
                redirects: []
                do_fork: T
              )
            right: <Id.Eof_RParen _>
          ) <'/printer.sh'>
        }
      ]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <source>
      more_env: []
      words: [
        {<source>}
        {
          (CommandSub
            left_token: <Id.Left_DollarParen '$('>
            child: 
              (command.Simple
                blame_tok: <dirname>
                more_env: []
                words: [{<dirname>} {($ Id.VSub_Number 0)}]
                redirects: []
                do_fork: T
              )
            right: <Id.Eof_RParen _>
          ) <'/env.sh'>
        }
      ]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <source>
      more_env: []
      words: [
        {<source>}
        {
          (CommandSub
            left_token: <Id.Left_DollarParen '$('>
            child: 
              (command.Simple
                blame_tok: <dirname>
                more_env: []
                words: [{<dirname>} {($ Id.VSub_Number 0)}]
                redirects: []
                do_fork: T
              )
            right: <Id.Eof_RParen _>
          ) <'/core.sh'>
        }
      ]
      redirects: []
      do_fork: T
    )
    (command.ShFunction
      name_tok: <READ>
      name: READ
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.AndOr
              children: [
                (command.Simple
                  blame_tok: <Id.Lit_LBracket '['>
                  more_env: []
                  words: [{<Id.Lit_LBracket '['>} {(DQ (${ Id.VSub_Number 1))} {<Id.Lit_RBracket ']'>}]
                  redirects: []
                  do_fork: T
                )
                (command.ShAssignment
                  left: <Id.Lit_VarLike 'r='>
                  pairs: [
                    (AssignPair
                      left: <Id.Lit_VarLike 'r='>
                      lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'r='> name:r)
                      op: assign_op.Equal
                      rhs: {(DQ (${ Id.VSub_Number 1))}
                    )
                  ]
                  redirects: []
                )
                (command.Simple
                  blame_tok: <READLINE>
                  more_env: []
                  words: [{<READLINE>}]
                  redirects: []
                  do_fork: T
                )
              ]
              ops: [<Id.Op_DAmp _> <Id.Op_DPipe _>]
            )
            (command.Simple
              blame_tok: <READ_STR>
              more_env: []
              words: [{<READ_STR>} {(DQ (${ Id.VSub_Name r))}]
              redirects: []
              do_fork: T
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShFunction
      name_tok: <IS_PAIR>
      name: IS_PAIR
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.If
              if_kw: <Id.KW_If if>
              arms: [
                (IfArm
                  keyword: <Id.KW_If if>
                  cond: 
                    (condition.Shell
                      commands: [
                        (command.Sentence
                          child: 
                            (command.Simple
                              blame_tok: <_sequential>
                              more_env: []
                              words: [{<_sequential> <Id.Lit_QMark '?'>} {(DQ (${ Id.VSub_Number 1))}]
                              redirects: []
                              do_fork: T
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  then_kw: <Id.KW_Then then>
                  action: [
                    (command.Simple
                      blame_tok: <_count>
                      more_env: []
                      words: [{<_count>} {(DQ (${ Id.VSub_Number 1))}]
                      redirects: []
                      do_fork: T
                    )
                    (command.AndOr
                      children: [
                        (command.DBracket
                          left: <Id.KW_DLeftBracket '[['>
                          expr: 
                            (bool_expr.Binary
                              op_id: Id.Op_Great
                              left: {(DQ (${ Id.VSub_Name r))}
                              right: {<0>}
                            )
                          right: <Id.Lit_DRightBracket ']]'>
                          redirects: []
                        )
                        (command.ControlFlow
                          keyword: <Id.ControlFlow_Return return>
                          arg_word: {<0>}
                        )
                      ]
                      ops: [<Id.Op_DAmp _>]
                    )
                  ]
                  spids: [98 110]
                )
              ]
              else_action: []
              fi_kw: <Id.KW_Fi fi>
              redirects: []
            )
            (command.ControlFlow keyword:<Id.ControlFlow_Return return> arg_word:{<1>})
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShFunction
      name_tok: <QUASIQUOTE>
      name: QUASIQUOTE
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.If
              if_kw: <Id.KW_If if>
              arms: [
                (IfArm
                  keyword: <Id.KW_If if>
                  cond: 
                    (condition.Shell
                      commands: [
                        (command.Sentence
                          child: 
                            (command.Pipeline
                              negated: <Id.KW_Bang '!'>
                              children: [
                                (command.Simple
                                  blame_tok: <IS_PAIR>
                                  more_env: []
                                  words: [{<IS_PAIR>} {(DQ (${ Id.VSub_Number 1))}]
                                  redirects: []
                                  do_fork: T
                                )
                              ]
                              ops: []
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  then_kw: <Id.KW_Then then>
                  action: [
                    (command.Simple
                      blame_tok: <_symbol>
                      more_env: []
                      words: [{<_symbol>} {<quote>}]
                      redirects: []
                      do_fork: T
                    )
                    (command.Simple
                      blame_tok: <_list>
                      more_env: []
                      words: [{<_list>} {(DQ (${ Id.VSub_Name r))} {(DQ (${ Id.VSub_Number 1))}]
                      redirects: []
                      do_fork: T
                    )
                    (command.ControlFlow keyword:<Id.ControlFlow_Return return>)
                  ]
                  spids: [161 174]
                )
              ]
              else_kw: <Id.KW_Else else>
              else_action: [
                (command.Sentence
                  child: 
                    (command.Simple
                      blame_tok: <_nth>
                      more_env: []
                      words: [{<_nth>} {(DQ (${ Id.VSub_Number 1))} {<0>}]
                      redirects: []
                      do_fork: T
                    )
                  terminator: <Id.Op_Semi _>
                )
                (command.Simple
                  blame_tok: <local>
                  more_env: []
                  words: [{<local>} {<Id.Lit_VarLike 'a0='> (DQ (${ Id.VSub_Name r))}]
                  redirects: []
                  do_fork: T
                )
                (command.If
                  if_kw: <Id.KW_If if>
                  arms: [
                    (IfArm
                      keyword: <Id.KW_If if>
                      cond: 
                        (condition.Shell
                          commands: [
                            (command.Sentence
                              child: 
                                (command.DBracket
                                  left: <Id.KW_DLeftBracket '[['>
                                  expr: 
                                    (bool_expr.Binary
                                      op_id: Id.BoolBinary_GlobDEqual
                                      left: 
                                        {
                                          (DQ 
                                            (BracedVarSub
                                              left: <Id.Left_DollarBrace '${'>
                                              token: <Id.VSub_Name ANON>
                                              var_name: ANON
                                              bracket_op: 
                                                (bracket_op.ArrayIndex
                                                  expr: {(DQ (${ Id.VSub_Name a0))}
                                                )
                                              right: <Id.Right_DollarBrace '}'>
                                            )
                                          )
                                        }
                                      right: {(DQ <unquote>)}
                                    )
                                  right: <Id.Lit_DRightBracket ']]'>
                                  redirects: []
                                )
                              terminator: <Id.Op_Semi _>
                            )
                          ]
                        )
                      then_kw: <Id.KW_Then then>
                      action: [
                        (command.Simple
                          blame_tok: <_nth>
                          more_env: []
                          words: [{<_nth>} {(DQ (${ Id.VSub_Number 1))} {<1>}]
                          redirects: []
                          do_fork: T
                        )
                        (command.ControlFlow
                          keyword: <Id.ControlFlow_Return return>
                        )
                      ]
                      spids: [224 250]
                    )
                    (IfArm
                      keyword: <Id.KW_Elif elif>
                      cond: 
                        (condition.Shell
                          commands: [
                            (command.Sentence
                              child: 
                                (command.Simple
                                  blame_tok: <IS_PAIR>
                                  more_env: []
                                  words: [{<IS_PAIR>} {(DQ (${ Id.VSub_Name a0))}]
                                  redirects: []
                                  do_fork: T
                                )
                              terminator: <Id.Op_Semi _>
                            )
                          ]
                        )
                      then_kw: <Id.KW_Then then>
                      action: [
                        (command.Sentence
                          child: 
                            (command.Simple
                              blame_tok: <_nth>
                              more_env: []
                              words: [{<_nth>} {(DQ (${ Id.VSub_Name a0))} {<0>}]
                              redirects: []
                              do_fork: T
                            )
                          terminator: <Id.Op_Semi _>
                        )
                        (command.Simple
                          blame_tok: <local>
                          more_env: []
                          words: [{<local>} {<Id.Lit_VarLike 'a00='> (DQ (${ Id.VSub_Name r))}]
                          redirects: []
                          do_fork: T
                        )
                        (command.If
                          if_kw: <Id.KW_If if>
                          arms: [
                            (IfArm
                              keyword: <Id.KW_If if>
                              cond: 
                                (condition.Shell
                                  commands: [
                                    (command.Sentence
                                      child: 
                                        (command.DBracket
                                          left: <Id.KW_DLeftBracket '[['>
                                          expr: 
                                            (bool_expr.Binary
                                              op_id: Id.BoolBinary_GlobDEqual
                                              left: 
                                                {
                                                  (DQ 
                                                    (BracedVarSub
                                                      left: <Id.Left_DollarBrace '${'>
                                                      token: <Id.VSub_Name ANON>
                                                      var_name: ANON
                                                      bracket_op: 
                                                        (bracket_op.ArrayIndex
                                                          expr: {(DQ (${ Id.VSub_Name a00))}
                                                        )
                                                      right: <Id.Right_DollarBrace '}'>
                                                    )
                                                  )
                                                }
                                              right: {(DQ <splice-unquote>)}
                                            )
                                          right: <Id.Lit_DRightBracket ']]'>
                                          redirects: []
                                        )
                                      terminator: <Id.Op_Semi _>
                                    )
                                  ]
                                )
                              then_kw: <Id.KW_Then then>
                              action: [
                                (command.Sentence
                                  child: 
                                    (command.Simple
                                      blame_tok: <_symbol>
                                      more_env: []
                                      words: [{<_symbol>} {<concat>}]
                                      redirects: []
                                      do_fork: T
                                    )
                                  terminator: <Id.Op_Semi _>
                                )
                                (command.Simple
                                  blame_tok: <local>
                                  more_env: []
                                  words: [{<local>} {<Id.Lit_VarLike 'a='> (DQ (${ Id.VSub_Name r))}]
                                  redirects: []
                                  do_fork: T
                                )
                                (command.Sentence
                                  child: 
                                    (command.Simple
                                      blame_tok: <_nth>
                                      more_env: []
                                      words: [{<_nth>} {(DQ (${ Id.VSub_Name a0))} {<1>}]
                                      redirects: []
                                      do_fork: T
                                    )
                                  terminator: <Id.Op_Semi _>
                                )
                                (command.Simple
                                  blame_tok: <local>
                                  more_env: []
                                  words: [{<local>} {<Id.Lit_VarLike 'b='> (DQ (${ Id.VSub_Name r))}]
                                  redirects: []
                                  do_fork: T
                                )
                                (command.Simple
                                  blame_tok: <_rest>
                                  more_env: []
                                  words: [{<_rest>} {(DQ (${ Id.VSub_Number 1))}]
                                  redirects: []
                                  do_fork: T
                                )
                                (command.Sentence
                                  child: 
                                    (command.Simple
                                      blame_tok: <QUASIQUOTE>
                                      more_env: []
                                      words: [{<QUASIQUOTE>} {(DQ (${ Id.VSub_Name r))}]
                                      redirects: []
                                      do_fork: T
                                    )
                                  terminator: <Id.Op_Semi _>
                                )
                                (command.Simple
                                  blame_tok: <local>
                                  more_env: []
                                  words: [{<local>} {<Id.Lit_VarLike 'c='> (DQ (${ Id.VSub_Name r))}]
                                  redirects: []
                                  do_fork: T
                                )
                                (command.Simple
                                  blame_tok: <_list>
                                  more_env: []
                                  words: [
                                    {<_list>}
                                    {(DQ (${ Id.VSub_Name a))}
                                    {(DQ (${ Id.VSub_Name b))}
                                    {(DQ (${ Id.VSub_Name c))}
                                  ]
                                  redirects: []
                                  do_fork: T
                                )
                                (command.ControlFlow
                                  keyword: <Id.ControlFlow_Return return>
                                )
                              ]
                              spids: [302 328]
                            )
                          ]
                          else_action: []
                          fi_kw: <Id.KW_Fi fi>
                          redirects: []
                        )
                      ]
                      spids: [267 278]
                    )
                  ]
                  else_action: []
                  fi_kw: <Id.KW_Fi fi>
                  redirects: []
                )
              ]
              fi_kw: <Id.KW_Fi fi>
              redirects: []
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <_symbol>
                  more_env: []
                  words: [{<_symbol>} {<cons>}]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <local>
              more_env: []
              words: [{<local>} {<Id.Lit_VarLike 'a='> (DQ (${ Id.VSub_Name r))}]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <QUASIQUOTE>
                  more_env: []
                  words: [{<QUASIQUOTE>} {(DQ (${ Id.VSub_Name a0))}]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <local>
              more_env: []
              words: [{<local>} {<Id.Lit_VarLike 'b='> (DQ (${ Id.VSub_Name r))}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <_rest>
              more_env: []
              words: [{<_rest>} {(DQ (${ Id.VSub_Number 1))}]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <QUASIQUOTE>
                  more_env: []
                  words: [{<QUASIQUOTE>} {(DQ (${ Id.VSub_Name r))}]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <local>
              more_env: []
              words: [{<local>} {<Id.Lit_VarLike 'c='> (DQ (${ Id.VSub_Name r))}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <_list>
              more_env: []
              words: [
                {<_list>}
                {(DQ (${ Id.VSub_Name a))}
                {(DQ (${ Id.VSub_Name b))}
                {(DQ (${ Id.VSub_Name c))}
              ]
              redirects: []
              do_fork: T
            )
            (command.ControlFlow keyword:<Id.ControlFlow_Return return>)
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShFunction
      name_tok: <EVAL_AST>
      name: EVAL_AST
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.Simple
              blame_tok: <local>
              more_env: []
              words: [
                {<local>}
                {<Id.Lit_VarLike 'ast='> (DQ (${ Id.VSub_Number 1))}
                {<Id.Lit_VarLike 'env='> (DQ (${ Id.VSub_Number 2))}
              ]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <_obj_type>
                  more_env: []
                  words: [{<_obj_type>} {(DQ (${ Id.VSub_Name ast))}]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <local>
              more_env: []
              words: [{<local>} {<Id.Lit_VarLike 'ot='> (DQ (${ Id.VSub_Name r))}]
              redirects: []
              do_fork: T
            )
            (command.Case
              case_kw: <Id.KW_Case case>
              to_match: (case_arg.Word w:{(DQ (${ Id.VSub_Name ot))})
              arms_start: <Id.KW_In in>
              arms: [
                (CaseArm
                  left: <symbol>
                  pattern: (pat.Words words:[{<symbol>}])
                  middle: <Id.Right_CasePat _>
                  action: [
                    (command.Simple
                      blame_tok: <ENV_GET>
                      more_env: []
                      words: [{<ENV_GET>} {(DQ (${ Id.VSub_Name env))} {(DQ (${ Id.VSub_Name ast))}]
                      redirects: []
                      do_fork: T
                    )
                    (command.ControlFlow keyword:<Id.ControlFlow_Return return>)
                  ]
                  right: <Id.Op_DSemi _>
                )
                (CaseArm
                  left: <list>
                  pattern: (pat.Words words:[{<list>}])
                  middle: <Id.Right_CasePat _>
                  action: [
                    (command.Simple
                      blame_tok: <_map_with_type>
                      more_env: []
                      words: [
                        {<_map_with_type>}
                        {<_list>}
                        {<EVAL>}
                        {(DQ (${ Id.VSub_Name ast))}
                        {(DQ (${ Id.VSub_Name env))}
                      ]
                      redirects: []
                      do_fork: T
                    )
                  ]
                  right: <Id.Op_DSemi _>
                )
                (CaseArm
                  left: <vector>
                  pattern: (pat.Words words:[{<vector>}])
                  middle: <Id.Right_CasePat _>
                  action: [
                    (command.Simple
                      blame_tok: <_map_with_type>
                      more_env: []
                      words: [
                        {<_map_with_type>}
                        {<_vector>}
                        {<EVAL>}
                        {(DQ (${ Id.VSub_Name ast))}
                        {(DQ (${ Id.VSub_Name env))}
                      ]
                      redirects: []
                      do_fork: T
                    )
                  ]
                  right: <Id.Op_DSemi _>
                )
                (CaseArm
                  left: <hash_map>
                  pattern: (pat.Words words:[{<hash_map>}])
                  middle: <Id.Right_CasePat _>
                  action: [
                    (command.Simple
                      blame_tok: <local>
                      more_env: []
                      words: [
                        {<local>}
                        {<Id.Lit_VarLike 'res='> (DQ )}
                        {<Id.Lit_VarLike 'key='>}
                        {<Id.Lit_VarLike 'val='> (DQ )}
                        {<Id.Lit_VarLike 'hm='> 
                          (DQ 
                            (BracedVarSub
                              left: <Id.Left_DollarBrace '${'>
                              token: <Id.VSub_Name ANON>
                              var_name: ANON
                              bracket_op: (bracket_op.ArrayIndex expr:{(DQ (${ Id.VSub_Name ast))})
                              right: <Id.Right_DollarBrace '}'>
                            )
                          )
                        }
                      ]
                      redirects: []
                      do_fork: T
                    )
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <_hash_map>
                          more_env: []
                          words: [{<_hash_map>}]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                    (command.Simple
                      blame_tok: <local>
                      more_env: []
                      words: [{<local>} {<Id.Lit_VarLike 'new_hm='> (DQ (${ Id.VSub_Name r))}]
                      redirects: []
                      do_fork: T
                    )
                    (command.Simple
                      blame_tok: <eval>
                      more_env: []
                      words: [
                        {<eval>}
                        {<local>}
                        {<Id.Lit_VarLike 'keys='> 
                          (DQ (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\$'> ch:'$') 
                            <'{!'> (${ Id.VSub_Name hm) <'[@]}'>
                          )
                        }
                      ]
                      redirects: []
                      do_fork: T
                    )
                    (command.ForEach
                      keyword: <Id.KW_For for>
                      iter_names: [key]
                      iterable: (for_iter.Words words:[{(${ Id.VSub_Name keys)}])
                      semi_tok: <Id.Op_Semi _>
                      body: 
                        (command.DoGroup
                          left: <Id.KW_Do do>
                          children: [
                            (command.Simple
                              blame_tok: <eval>
                              more_env: []
                              words: [
                                {<eval>}
                                {<Id.Lit_VarLike 'val='> 
                                  (DQ 
                                    (word_part.EscapedLiteral
                                      token: <Id.Lit_EscapedChar '\\$'>
                                      ch: '$'
                                    ) <'{'> (${ Id.VSub_Name hm) <'['> (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') 
                                    (${ Id.VSub_Name key) (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') <']}'>
                                  )
                                }
                              ]
                              redirects: []
                              do_fork: T
                            )
                            (command.Simple
                              blame_tok: <EVAL>
                              more_env: []
                              words: [{<EVAL>} {(DQ (${ Id.VSub_Name val))} {(DQ (${ Id.VSub_Name env))}]
                              redirects: []
                              do_fork: T
                            )
                            (command.Simple
                              blame_tok: <_assoc>
                              more_env: []
                              words: [
                                {<_assoc> <Id.KW_Bang '!'>}
                                {(DQ (${ Id.VSub_Name new_hm))}
                                {(DQ (${ Id.VSub_Name key))}
                                {(DQ (${ Id.VSub_Name r))}
                              ]
                              redirects: []
                              do_fork: T
                            )
                          ]
                          right: <Id.KW_Done done>
                        )
                      redirects: []
                    )
                    (command.ShAssignment
                      left: <Id.Lit_VarLike 'r='>
                      pairs: [
                        (AssignPair
                          left: <Id.Lit_VarLike 'r='>
                          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'r='> name:r)
                          op: assign_op.Equal
                          rhs: {(DQ (${ Id.VSub_Name new_hm))}
                        )
                      ]
                      redirects: []
                    )
                  ]
                  right: <Id.Op_DSemi _>
                )
                (CaseArm
                  left: <Id.Lit_Star '*'>
                  pattern: (pat.Words words:[{<Id.Lit_Star '*'>}])
                  middle: <Id.Right_CasePat _>
                  action: [
                    (command.ShAssignment
                      left: <Id.Lit_VarLike 'r='>
                      pairs: [
                        (AssignPair
                          left: <Id.Lit_VarLike 'r='>
                          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'r='> name:r)
                          op: assign_op.Equal
                          rhs: {(DQ (${ Id.VSub_Name ast))}
                        )
                      ]
                      redirects: []
                    )
                  ]
                  right: <Id.Op_DSemi _>
                )
              ]
              arms_end: <Id.KW_Esac esac>
              redirects: []
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShFunction
      name_tok: <EVAL>
      name: EVAL
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.Simple
              blame_tok: <local>
              more_env: []
              words: [
                {<local>}
                {<Id.Lit_VarLike 'ast='> (DQ (${ Id.VSub_Number 1))}
                {<Id.Lit_VarLike 'env='> (DQ (${ Id.VSub_Number 2))}
              ]
              redirects: []
              do_fork: T
            )
            (command.WhileUntil
              keyword: <Id.KW_While while>
              cond: 
                (condition.Shell
                  commands: [
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <true>
                          more_env: []
                          words: [{<true>}]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                )
              body: 
                (command.DoGroup
                  left: <Id.KW_Do do>
                  children: [
                    (command.ShAssignment
                      left: <Id.Lit_VarLike 'r='>
                      pairs: [
                        (AssignPair
                          left: <Id.Lit_VarLike 'r='>
                          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'r='> name:r)
                          op: assign_op.Equal
                          rhs: (rhs_word__Empty)
                        )
                      ]
                      redirects: []
                    )
                    (command.AndOr
                      children: [
                        (command.DBracket
                          left: <Id.KW_DLeftBracket '[['>
                          expr: (bool_expr.WordTest w:{(DQ (${ Id.VSub_Name __ERROR))})
                          right: <Id.Lit_DRightBracket ']]'>
                          redirects: []
                        )
                        (command.ControlFlow
                          keyword: <Id.ControlFlow_Return return>
                          arg_word: {<1>}
                        )
                      ]
                      ops: [<Id.Op_DAmp _>]
                    )
                    (command.If
                      if_kw: <Id.KW_If if>
                      arms: [
                        (IfArm
                          keyword: <Id.KW_If if>
                          cond: 
                            (condition.Shell
                              commands: [
                                (command.Sentence
                                  child: 
                                    (command.Pipeline
                                      negated: <Id.KW_Bang '!'>
                                      children: [
                                        (command.Simple
                                          blame_tok: <_list>
                                          more_env: []
                                          words: [
                                            {<_list> <Id.Lit_QMark '?'>}
                                            {(DQ (${ Id.VSub_Name ast))}
                                          ]
                                          redirects: []
                                          do_fork: T
                                        )
                                      ]
                                      ops: []
                                    )
                                  terminator: <Id.Op_Semi _>
                                )
                              ]
                            )
                          then_kw: <Id.KW_Then then>
                          action: [
                            (command.Simple
                              blame_tok: <EVAL_AST>
                              more_env: []
                              words: [
                                {<EVAL_AST>}
                                {(DQ (${ Id.VSub_Name ast))}
                                {(DQ (${ Id.VSub_Name env))}
                              ]
                              redirects: []
                              do_fork: T
                            )
                            (command.ControlFlow
                              keyword: <Id.ControlFlow_Return return>
                            )
                          ]
                          spids: [867 881]
                        )
                      ]
                      else_action: []
                      fi_kw: <Id.KW_Fi fi>
                      redirects: []
                    )
                    (command.AndOr
                      children: [
                        (command.Simple
                          blame_tok: <_empty>
                          more_env: []
                          words: [{<_empty> <Id.Lit_QMark '?'>} {(DQ (${ Id.VSub_Name ast))}]
                          redirects: []
                          do_fork: T
                        )
                        (command.ShAssignment
                          left: <Id.Lit_VarLike 'r='>
                          pairs: [
                            (AssignPair
                              left: <Id.Lit_VarLike 'r='>
                              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'r='> name:r)
                              op: assign_op.Equal
                              rhs: {(DQ (${ Id.VSub_Name ast))}
                            )
                          ]
                          redirects: []
                        )
                        (command.ControlFlow
                          keyword: <Id.ControlFlow_Return return>
                        )
                      ]
                      ops: [<Id.Op_DAmp _> <Id.Op_DAmp _>]
                    )
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <_nth>
                          more_env: []
                          words: [{<_nth>} {(DQ (${ Id.VSub_Name ast))} {<0>}]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                    (command.Simple
                      blame_tok: <local>
                      more_env: []
                      words: [{<local>} {<Id.Lit_VarLike 'a0='> (DQ (${ Id.VSub_Name r))}]
                      redirects: []
                      do_fork: T
                    )
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <_nth>
                          more_env: []
                          words: [{<_nth>} {(DQ (${ Id.VSub_Name ast))} {<1>}]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                    (command.Simple
                      blame_tok: <local>
                      more_env: []
                      words: [{<local>} {<Id.Lit_VarLike 'a1='> (DQ (${ Id.VSub_Name r))}]
                      redirects: []
                      do_fork: T
                    )
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <_nth>
                          more_env: []
                          words: [{<_nth>} {(DQ (${ Id.VSub_Name ast))} {<2>}]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                    (command.Simple
                      blame_tok: <local>
                      more_env: []
                      words: [{<local>} {<Id.Lit_VarLike 'a2='> (DQ (${ Id.VSub_Name r))}]
                      redirects: []
                      do_fork: T
                    )
                    (command.Case
                      case_kw: <Id.KW_Case case>
                      to_match: 
                        (case_arg.Word
                          w: 
                            {
                              (DQ 
                                (BracedVarSub
                                  left: <Id.Left_DollarBrace '${'>
                                  token: <Id.VSub_Name ANON>
                                  var_name: ANON
                                  bracket_op: (bracket_op.ArrayIndex expr:{(DQ (${ Id.VSub_Name a0))})
                                  right: <Id.Right_DollarBrace '}'>
                                )
                              )
                            }
                        )
                      arms_start: <Id.KW_In in>
                      arms: [
                        (CaseArm
                          left: <def>
                          pattern: (pat.Words words:[{<def> <Id.KW_Bang '!'>}])
                          middle: <Id.Right_CasePat _>
                          action: [
                            (command.Simple
                              blame_tok: <EVAL>
                              more_env: []
                              words: [{<EVAL>} {(DQ (${ Id.VSub_Name a2))} {(DQ (${ Id.VSub_Name env))}]
                              redirects: []
                              do_fork: T
                            )
                            (command.AndOr
                              children: [
                                (command.DBracket
                                  left: <Id.KW_DLeftBracket '[['>
                                  expr: (bool_expr.WordTest w:{(DQ (${ Id.VSub_Name __ERROR))})
                                  right: <Id.Lit_DRightBracket ']]'>
                                  redirects: []
                                )
                                (command.ControlFlow
                                  keyword: <Id.ControlFlow_Return return>
                                  arg_word: {<1>}
                                )
                              ]
                              ops: [<Id.Op_DAmp _>]
                            )
                            (command.Simple
                              blame_tok: <ENV_SET>
                              more_env: []
                              words: [
                                {<ENV_SET>}
                                {(DQ (${ Id.VSub_Name env))}
                                {(DQ (${ Id.VSub_Name a1))}
                                {(DQ (${ Id.VSub_Name r))}
                              ]
                              redirects: []
                              do_fork: T
                            )
                            (command.ControlFlow
                              keyword: <Id.ControlFlow_Return return>
                            )
                          ]
                          right: <Id.Op_DSemi _>
                        )
                        (CaseArm
                          left: <let>
                          pattern: (pat.Words words:[{<let> <Id.Lit_Star '*'>}])
                          middle: <Id.Right_CasePat _>
                          action: [
                            (command.Sentence
                              child: 
                                (command.Simple
                                  blame_tok: <ENV>
                                  more_env: []
                                  words: [{<ENV>} {(DQ (${ Id.VSub_Name env))}]
                                  redirects: []
                                  do_fork: T
                                )
                              terminator: <Id.Op_Semi _>
                            )
                            (command.Simple
                              blame_tok: <local>
                              more_env: []
                              words: [{<local>} {<Id.Lit_VarLike 'let_env='> (DQ (${ Id.VSub_Name r))}]
                              redirects: []
                              do_fork: T
                            )
                            (command.Simple
                              blame_tok: <local>
                              more_env: []
                              words: [
                                {<local>}
                                {<Id.Lit_VarLike 'let_pairs='> 
                                  (ShArrayLiteral
                                    left: <Id.Op_LParen _>
                                    words: [
                                      {
                                        (BracedVarSub
                                          left: <Id.Left_DollarBrace '${'>
                                          token: <Id.VSub_Name ANON>
                                          var_name: ANON
                                          bracket_op: 
                                            (bracket_op.ArrayIndex
                                              expr: {(DQ (${ Id.VSub_Name a1))}
                                            )
                                          right: <Id.Right_DollarBrace '}'>
                                        )
                                      }
                                    ]
                                    right: <Id.Right_ShArrayLiteral _>
                                  )
                                }
                              ]
                              redirects: []
                              do_fork: T
                            )
                            (command.Simple
                              blame_tok: <local>
                              more_env: []
                              words: [{<local>} {<Id.Lit_VarLike 'idx='> <0>}]
                              redirects: []
                              do_fork: T
                            )
                            (command.WhileUntil
                              keyword: <Id.KW_While while>
                              cond: 
                                (condition.Shell
                                  commands: [
                                    (command.Sentence
                                      child: 
                                        (command.DBracket
                                          left: <Id.KW_DLeftBracket '[['>
                                          expr: 
                                            (bool_expr.WordTest
                                              w: 
                                                {
                                                  (DQ 
                                                    (BracedVarSub
                                                      left: <Id.Left_DollarBrace '${'>
                                                      token: <Id.VSub_Name let_pairs>
                                                      var_name: let_pairs
                                                      bracket_op: 
                                                        (bracket_op.ArrayIndex
                                                          expr: {(DQ (${ Id.VSub_Name idx))}
                                                        )
                                                      right: <Id.Right_DollarBrace '}'>
                                                    )
                                                  )
                                                }
                                            )
                                          right: <Id.Lit_DRightBracket ']]'>
                                          redirects: []
                                        )
                                      terminator: <Id.Op_Semi _>
                                    )
                                  ]
                                )
                              body: 
                                (command.DoGroup
                                  left: <Id.KW_Do do>
                                  children: [
                                    (command.Simple
                                      blame_tok: <EVAL>
                                      more_env: []
                                      words: [
                                        {<EVAL>}
                                        {
                                          (DQ 
                                            (BracedVarSub
                                              left: <Id.Left_DollarBrace '${'>
                                              token: <Id.VSub_Name let_pairs>
                                              var_name: let_pairs
                                              bracket_op: 
                                                (bracket_op.ArrayIndex
                                                  expr: 
                                                    {
                                                      (word_part.ArithSub
                                                        left: <Id.Left_DollarDParen '$(('>
                                                        anode: 
                                                          (arith_expr.Binary
                                                            op_id: Id.Arith_Plus
                                                            left: ($ Id.Lit_ArithVarLike idx)
                                                            right: {<Id.Lit_Digits 1>}
                                                          )
                                                        right: <Id.Right_DollarDParen _>
                                                      )
                                                    }
                                                )
                                              right: <Id.Right_DollarBrace '}'>
                                            )
                                          )
                                        }
                                        {(DQ (${ Id.VSub_Name let_env))}
                                      ]
                                      redirects: []
                                      do_fork: T
                                    )
                                    (command.Simple
                                      blame_tok: <ENV_SET>
                                      more_env: []
                                      words: [
                                        {<ENV_SET>}
                                        {(DQ (${ Id.VSub_Name let_env))}
                                        {
                                          (DQ 
                                            (BracedVarSub
                                              left: <Id.Left_DollarBrace '${'>
                                              token: <Id.VSub_Name let_pairs>
                                              var_name: let_pairs
                                              bracket_op: 
                                                (bracket_op.ArrayIndex
                                                  expr: {(${ Id.VSub_Name idx)}
                                                )
                                              right: <Id.Right_DollarBrace '}'>
                                            )
                                          )
                                        }
                                        {(DQ (${ Id.VSub_Name r))}
                                      ]
                                      redirects: []
                                      do_fork: T
                                    )
                                    (command.ShAssignment
                                      left: <Id.Lit_VarLike 'idx='>
                                      pairs: [
                                        (AssignPair
                                          left: <Id.Lit_VarLike 'idx='>
                                          lhs: 
                                            (sh_lhs_expr.Name
                                              left: <Id.Lit_VarLike 'idx='>
                                              name: idx
                                            )
                                          op: assign_op.Equal
                                          rhs: 
                                            {
                                              (word_part.ArithSub
                                                left: <Id.Left_DollarDParen '$(('>
                                                anode: 
                                                  (arith_expr.Binary
                                                    op_id: Id.Arith_Plus
                                                    left: ($ Id.Lit_ArithVarLike idx)
                                                    right: {<Id.Lit_Digits 2>}
                                                  )
                                                right: <Id.Right_DollarDParen _>
                                              )
                                            }
                                        )
                                      ]
                                      redirects: []
                                    )
                                  ]
                                  right: <Id.KW_Done done>
                                )
                              redirects: []
                            )
                            (command.ShAssignment
                              left: <Id.Lit_VarLike 'ast='>
                              pairs: [
                                (AssignPair
                                  left: <Id.Lit_VarLike 'ast='>
                                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'ast='> name:ast)
                                  op: assign_op.Equal
                                  rhs: {(DQ (${ Id.VSub_Name a2))}
                                )
                              ]
                              redirects: []
                            )
                            (command.ShAssignment
                              left: <Id.Lit_VarLike 'env='>
                              pairs: [
                                (AssignPair
                                  left: <Id.Lit_VarLike 'env='>
                                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'env='> name:env)
                                  op: assign_op.Equal
                                  rhs: {(DQ (${ Id.VSub_Name let_env))}
                                )
                              ]
                              redirects: []
                            )
                          ]
                          right: <Id.Op_DSemi _>
                        )
                        (CaseArm
                          left: <quote>
                          pattern: (pat.Words words:[{<quote>}])
                          middle: <Id.Right_CasePat _>
                          action: [
                            (command.ShAssignment
                              left: <Id.Lit_VarLike 'r='>
                              pairs: [
                                (AssignPair
                                  left: <Id.Lit_VarLike 'r='>
                                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'r='> name:r)
                                  op: assign_op.Equal
                                  rhs: {(DQ (${ Id.VSub_Name a1))}
                                )
                              ]
                              redirects: []
                            )
                            (command.ControlFlow
                              keyword: <Id.ControlFlow_Return return>
                            )
                          ]
                          right: <Id.Op_DSemi _>
                        )
                        (CaseArm
                          left: <quasiquote>
                          pattern: (pat.Words words:[{<quasiquote>}])
                          middle: <Id.Right_CasePat _>
                          action: [
                            (command.Simple
                              blame_tok: <QUASIQUOTE>
                              more_env: []
                              words: [{<QUASIQUOTE>} {(DQ (${ Id.VSub_Name a1))}]
                              redirects: []
                              do_fork: T
                            )
                            (command.ShAssignment
                              left: <Id.Lit_VarLike 'ast='>
                              pairs: [
                                (AssignPair
                                  left: <Id.Lit_VarLike 'ast='>
                                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'ast='> name:ast)
                                  op: assign_op.Equal
                                  rhs: {(DQ (${ Id.VSub_Name r))}
                                )
                              ]
                              redirects: []
                            )
                          ]
                          right: <Id.Op_DSemi _>
                        )
                        (CaseArm
                          left: <Id.KW_Do do>
                          pattern: (pat.Words words:[{<Id.KW_Do do>}])
                          middle: <Id.Right_CasePat _>
                          action: [
                            (command.Simple
                              blame_tok: <_count>
                              more_env: []
                              words: [{<_count>} {(DQ (${ Id.VSub_Name ast))}]
                              redirects: []
                              do_fork: T
                            )
                            (command.Simple
                              blame_tok: <_slice>
                              more_env: []
                              words: [
                                {<_slice>}
                                {(DQ (${ Id.VSub_Name ast))}
                                {<1>}
                                {
                                  (word_part.ArithSub
                                    left: <Id.Left_DollarDParen '$(('>
                                    anode: 
                                      (arith_expr.Binary
                                        op_id: Id.Arith_Minus
                                        left: {(${ Id.VSub_Name r)}
                                        right: {<Id.Lit_Digits 2>}
                                      )
                                    right: <Id.Right_DollarDParen _>
                                  )
                                }
                              ]
                              redirects: []
                              do_fork: T
                            )
                            (command.Simple
                              blame_tok: <EVAL_AST>
                              more_env: []
                              words: [
                                {<EVAL_AST>}
                                {(DQ (${ Id.VSub_Name r))}
                                {(DQ (${ Id.VSub_Name env))}
                              ]
                              redirects: []
                              do_fork: T
                            )
                            (command.AndOr
                              children: [
                                (command.DBracket
                                  left: <Id.KW_DLeftBracket '[['>
                                  expr: (bool_expr.WordTest w:{(DQ (${ Id.VSub_Name __ERROR))})
                                  right: <Id.Lit_DRightBracket ']]'>
                                  redirects: []
                                )
                                (command.ShAssignment
                                  left: <Id.Lit_VarLike 'r='>
                                  pairs: [
                                    (AssignPair
                                      left: <Id.Lit_VarLike 'r='>
                                      lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'r='> name:r)
                                      op: assign_op.Equal
                                      rhs: (rhs_word__Empty)
                                    )
                                  ]
                                  redirects: []
                                )
                                (command.ControlFlow
                                  keyword: <Id.ControlFlow_Return return>
                                  arg_word: {<1>}
                                )
                              ]
                              ops: [<Id.Op_DAmp _> <Id.Op_DAmp _>]
                            )
                            (command.Simple
                              blame_tok: <_last>
                              more_env: []
                              words: [{<_last>} {(DQ (${ Id.VSub_Name ast))}]
                              redirects: []
                              do_fork: T
                            )
                            (command.ShAssignment
                              left: <Id.Lit_VarLike 'ast='>
                              pairs: [
                                (AssignPair
                                  left: <Id.Lit_VarLike 'ast='>
                                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'ast='> name:ast)
                                  op: assign_op.Equal
                                  rhs: {(DQ (${ Id.VSub_Name r))}
                                )
                              ]
                              redirects: []
                            )
                          ]
                          right: <Id.Op_DSemi _>
                        )
                        (CaseArm
                          left: <Id.KW_If if>
                          pattern: (pat.Words words:[{<Id.KW_If if>}])
                          middle: <Id.Right_CasePat _>
                          action: [
                            (command.Simple
                              blame_tok: <EVAL>
                              more_env: []
                              words: [{<EVAL>} {(DQ (${ Id.VSub_Name a1))} {(DQ (${ Id.VSub_Name env))}]
                              redirects: []
                              do_fork: T
                            )
                            (command.AndOr
                              children: [
                                (command.DBracket
                                  left: <Id.KW_DLeftBracket '[['>
                                  expr: (bool_expr.WordTest w:{(DQ (${ Id.VSub_Name __ERROR))})
                                  right: <Id.Lit_DRightBracket ']]'>
                                  redirects: []
                                )
                                (command.ControlFlow
                                  keyword: <Id.ControlFlow_Return return>
                                  arg_word: {<1>}
                                )
                              ]
                              ops: [<Id.Op_DAmp _>]
                            )
                            (command.If
                              if_kw: <Id.KW_If if>
                              arms: [
                                (IfArm
                                  keyword: <Id.KW_If if>
                                  cond: 
                                    (condition.Shell
                                      commands: [
                                        (command.Sentence
                                          child: 
                                            (command.DBracket
                                              left: <Id.KW_DLeftBracket '[['>
                                              expr: 
                                                (bool_expr.LogicalOr
                                                  left: 
                                                    (bool_expr.Binary
                                                      op_id: Id.BoolBinary_GlobDEqual
                                                      left: {(DQ (${ Id.VSub_Name r))}
                                                      right: {(DQ (${ Id.VSub_Name __false))}
                                                    )
                                                  right: 
                                                    (bool_expr.Binary
                                                      op_id: Id.BoolBinary_GlobDEqual
                                                      left: {(DQ (${ Id.VSub_Name r))}
                                                      right: {(DQ (${ Id.VSub_Name __nil))}
                                                    )
                                                )
                                              right: <Id.Lit_DRightBracket ']]'>
                                              redirects: []
                                            )
                                          terminator: <Id.Op_Semi _>
                                        )
                                      ]
                                    )
                                  then_kw: <Id.KW_Then then>
                                  action: [
                                    (command.Sentence
                                      child: 
                                        (command.Simple
                                          blame_tok: <_nth>
                                          more_env: []
                                          words: [{<_nth>} {(DQ (${ Id.VSub_Name ast))} {<3>}]
                                          redirects: []
                                          do_fork: T
                                        )
                                      terminator: <Id.Op_Semi _>
                                    )
                                    (command.Simple
                                      blame_tok: <local>
                                      more_env: []
                                      words: [
                                        {<local>}
                                        {<Id.Lit_VarLike 'a3='> (DQ (${ Id.VSub_Name r))}
                                      ]
                                      redirects: []
                                      do_fork: T
                                    )
                                    (command.If
                                      if_kw: <Id.KW_If if>
                                      arms: [
                                        (IfArm
                                          keyword: <Id.KW_If if>
                                          cond: 
                                            (condition.Shell
                                              commands: [
                                                (command.Sentence
                                                  child: 
                                                    (command.DBracket
                                                      left: <Id.KW_DLeftBracket '[['>
                                                      expr: 
                                                        (bool_expr.WordTest
                                                          w: {(DQ (${ Id.VSub_Name a3))}
                                                        )
                                                      right: <Id.Lit_DRightBracket ']]'>
                                                      redirects: []
                                                    )
                                                  terminator: <Id.Op_Semi _>
                                                )
                                              ]
                                            )
                                          then_kw: <Id.KW_Then then>
                                          action: [
                                            (command.ShAssignment
                                              left: <Id.Lit_VarLike 'ast='>
                                              pairs: [
                                                (AssignPair
                                                  left: <Id.Lit_VarLike 'ast='>
                                                  lhs: 
                                                    (sh_lhs_expr.Name
                                                      left: <Id.Lit_VarLike 'ast='>
                                                      name: ast
                                                    )
                                                  op: assign_op.Equal
                                                  rhs: {(DQ (${ Id.VSub_Name a3))}
                                                )
                                              ]
                                              redirects: []
                                            )
                                          ]
                                          spids: [1480 1493]
                                        )
                                      ]
                                      else_kw: <Id.KW_Else else>
                                      else_action: [
                                        (command.ShAssignment
                                          left: <Id.Lit_VarLike 'r='>
                                          pairs: [
                                            (AssignPair
                                              left: <Id.Lit_VarLike 'r='>
                                              lhs: 
                                                (sh_lhs_expr.Name
                                                  left: <Id.Lit_VarLike 'r='>
                                                  name: r
                                                )
                                              op: assign_op.Equal
                                              rhs: {(DQ (${ Id.VSub_Name __nil))}
                                            )
                                          ]
                                          redirects: []
                                        )
                                        (command.ControlFlow
                                          keyword: <Id.ControlFlow_Return return>
                                        )
                                      ]
                                      fi_kw: <Id.KW_Fi fi>
                                      redirects: []
                                    )
                                  ]
                                  spids: [1415 1452]
                                )
                              ]
                              else_kw: <Id.KW_Else else>
                              else_action: [
                                (command.ShAssignment
                                  left: <Id.Lit_VarLike 'ast='>
                                  pairs: [
                                    (AssignPair
                                      left: <Id.Lit_VarLike 'ast='>
                                      lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'ast='> name:ast)
                                      op: assign_op.Equal
                                      rhs: {(DQ (${ Id.VSub_Name a2))}
                                    )
                                  ]
                                  redirects: []
                                )
                              ]
                              fi_kw: <Id.KW_Fi fi>
                              redirects: []
                            )
                          ]
                          right: <Id.Op_DSemi _>
                        )
                        (CaseArm
                          left: <fn>
                          pattern: (pat.Words words:[{<fn> <Id.Lit_Star '*'>}])
                          middle: <Id.Right_CasePat _>
                          action: [
                            (command.Simple
                              blame_tok: <_function>
                              more_env: []
                              words: [
                                {<_function>}
                                {
                                  (DQ <'ENV '> 
                                    (word_part.EscapedLiteral
                                      token: <Id.Lit_EscapedChar '\\"'>
                                      ch: '"'
                                    ) (${ Id.VSub_Name env) (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') <' '> 
                                    (word_part.EscapedLiteral
                                      token: <Id.Lit_EscapedChar '\\"'>
                                      ch: '"'
                                    ) (${ Id.VSub_Name a1) (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') <' '> 
                                    (word_part.EscapedLiteral
                                      token: <Id.Lit_EscapedChar '\\"'>
                                      ch: '"'
                                    ) (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\$'> ch:'$') <'{@}'> 
                                    (word_part.EscapedLiteral
                                      token: <Id.Lit_EscapedChar '\\"'>
                                      ch: '"'
                                    ) <'; '> <'                         EVAL '> 
                                    (word_part.EscapedLiteral
                                      token: <Id.Lit_EscapedChar '\\"'>
                                      ch: '"'
                                    ) (${ Id.VSub_Name a2) (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') <' '> 
                                    (word_part.EscapedLiteral
                                      token: <Id.Lit_EscapedChar '\\"'>
                                      ch: '"'
                                    ) (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\$'> ch:'$') <'{r}'> 
                                    (word_part.EscapedLiteral
                                      token: <Id.Lit_EscapedChar '\\"'>
                                      ch: '"'
                                    )
                                  )
                                }
                                {(DQ (${ Id.VSub_Name a2))}
                                {(DQ (${ Id.VSub_Name env))}
                                {(DQ (${ Id.VSub_Name a1))}
                              ]
                              redirects: []
                              do_fork: T
                            )
                            (command.ControlFlow
                              keyword: <Id.ControlFlow_Return return>
                            )
                          ]
                          right: <Id.Op_DSemi _>
                        )
                        (CaseArm
                          left: <Id.Lit_Star '*'>
                          pattern: (pat.Words words:[{<Id.Lit_Star '*'>}])
                          middle: <Id.Right_CasePat _>
                          action: [
                            (command.Simple
                              blame_tok: <EVAL_AST>
                              more_env: []
                              words: [
                                {<EVAL_AST>}
                                {(DQ (${ Id.VSub_Name ast))}
                                {(DQ (${ Id.VSub_Name env))}
                              ]
                              redirects: []
                              do_fork: T
                            )
                            (command.AndOr
                              children: [
                                (command.DBracket
                                  left: <Id.KW_DLeftBracket '[['>
                                  expr: (bool_expr.WordTest w:{(DQ (${ Id.VSub_Name __ERROR))})
                                  right: <Id.Lit_DRightBracket ']]'>
                                  redirects: []
                                )
                                (command.ShAssignment
                                  left: <Id.Lit_VarLike 'r='>
                                  pairs: [
                                    (AssignPair
                                      left: <Id.Lit_VarLike 'r='>
                                      lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'r='> name:r)
                                      op: assign_op.Equal
                                      rhs: (rhs_word__Empty)
                                    )
                                  ]
                                  redirects: []
                                )
                                (command.ControlFlow
                                  keyword: <Id.ControlFlow_Return return>
                                  arg_word: {<1>}
                                )
                              ]
                              ops: [<Id.Op_DAmp _> <Id.Op_DAmp _>]
                            )
                            (command.Simple
                              blame_tok: <local>
                              more_env: []
                              words: [{<local>} {<Id.Lit_VarLike 'el='> (DQ (${ Id.VSub_Name r))}]
                              redirects: []
                              do_fork: T
                            )
                            (command.Sentence
                              child: 
                                (command.Simple
                                  blame_tok: <_first>
                                  more_env: []
                                  words: [{<_first>} {(DQ (${ Id.VSub_Name el))}]
                                  redirects: []
                                  do_fork: T
                                )
                              terminator: <Id.Op_Semi _>
                            )
                            (command.Simple
                              blame_tok: <local>
                              more_env: []
                              words: [
                                {<local>}
                                {<Id.Lit_VarLike 'f='> 
                                  (DQ 
                                    (BracedVarSub
                                      left: <Id.Left_DollarBrace '${'>
                                      token: <Id.VSub_Name ANON>
                                      var_name: ANON
                                      bracket_op: 
                                        (bracket_op.ArrayIndex
                                          expr: {(DQ (${ Id.VSub_Name r))}
                                        )
                                      right: <Id.Right_DollarBrace '}'>
                                    )
                                  )
                                }
                              ]
                              redirects: []
                              do_fork: T
                            )
                            (command.Sentence
                              child: 
                                (command.Simple
                                  blame_tok: <_rest>
                                  more_env: []
                                  words: [{<_rest>} {(DQ (${ Id.VSub_Name el))}]
                                  redirects: []
                                  do_fork: T
                                )
                              terminator: <Id.Op_Semi _>
                            )
                            (command.Simple
                              blame_tok: <local>
                              more_env: []
                              words: [
                                {<local>}
                                {<Id.Lit_VarLike 'args='> 
                                  (DQ 
                                    (BracedVarSub
                                      left: <Id.Left_DollarBrace '${'>
                                      token: <Id.VSub_Name ANON>
                                      var_name: ANON
                                      bracket_op: 
                                        (bracket_op.ArrayIndex
                                          expr: {(DQ (${ Id.VSub_Name r))}
                                        )
                                      right: <Id.Right_DollarBrace '}'>
                                    )
                                  )
                                }
                              ]
                              redirects: []
                              do_fork: T
                            )
                            (command.If
                              if_kw: <Id.KW_If if>
                              arms: [
                                (IfArm
                                  keyword: <Id.KW_If if>
                                  cond: 
                                    (condition.Shell
                                      commands: [
                                        (command.Sentence
                                          child: 
                                            (command.DBracket
                                              left: <Id.KW_DLeftBracket '[['>
                                              expr: 
                                                (bool_expr.Binary
                                                  op_id: Id.BoolBinary_GlobNEqual
                                                  left: 
                                                    {
                                                      (DQ 
                                                        (BracedVarSub
                                                          left: <Id.Left_DollarBrace '${'>
                                                          token: <Id.VSub_Name f>
                                                          var_name: f
                                                          suffix_op: 
                                                            (suffix_op.PatSub
                                                              pat: {<Id.Lit_Other '@'>}
                                                              replace: {<' '>}
                                                              replace_mode: Id.Lit_Slash
                                                              slash_tok: <Id.VOp2_Slash _>
                                                            )
                                                          right: <Id.Right_DollarBrace '}'>
                                                        )
                                                      )
                                                    }
                                                  right: {(DQ (${ Id.VSub_Name f))}
                                                )
                                              right: <Id.Lit_DRightBracket ']]'>
                                              redirects: []
                                            )
                                          terminator: <Id.Op_Semi _>
                                        )
                                      ]
                                    )
                                  then_kw: <Id.KW_Then then>
                                  action: [
                                    (command.Simple
                                      blame_tok: <set>
                                      more_env: []
                                      words: [
                                        {<set>}
                                        {<-->}
                                        {
                                          (BracedVarSub
                                            left: <Id.Left_DollarBrace '${'>
                                            token: <Id.VSub_Name f>
                                            var_name: f
                                            suffix_op: 
                                              (suffix_op.PatSub
                                                pat: {<Id.Lit_Other '@'>}
                                                replace: {<' '>}
                                                replace_mode: Id.Lit_Slash
                                                slash_tok: <Id.VOp2_Slash _>
                                              )
                                            right: <Id.Right_DollarBrace '}'>
                                          )
                                        }
                                      ]
                                      redirects: []
                                      do_fork: T
                                    )
                                    (command.ShAssignment
                                      left: <Id.Lit_VarLike 'ast='>
                                      pairs: [
                                        (AssignPair
                                          left: <Id.Lit_VarLike 'ast='>
                                          lhs: 
                                            (sh_lhs_expr.Name
                                              left: <Id.Lit_VarLike 'ast='>
                                              name: ast
                                            )
                                          op: assign_op.Equal
                                          rhs: {(DQ (${ Id.VSub_Number 2))}
                                        )
                                      ]
                                      redirects: []
                                    )
                                    (command.Simple
                                      blame_tok: <ENV>
                                      more_env: []
                                      words: [
                                        {<ENV>}
                                        {(DQ (${ Id.VSub_Number 3))}
                                        {(DQ (${ Id.VSub_Number 4))}
                                        {(${ Id.VSub_Name args)}
                                      ]
                                      redirects: []
                                      do_fork: T
                                    )
                                    (command.ShAssignment
                                      left: <Id.Lit_VarLike 'env='>
                                      pairs: [
                                        (AssignPair
                                          left: <Id.Lit_VarLike 'env='>
                                          lhs: 
                                            (sh_lhs_expr.Name
                                              left: <Id.Lit_VarLike 'env='>
                                              name: env
                                            )
                                          op: assign_op.Equal
                                          rhs: {(DQ (${ Id.VSub_Name r))}
                                        )
                                      ]
                                      redirects: []
                                    )
                                  ]
                                  spids: [1716 1742]
                                )
                              ]
                              else_kw: <Id.KW_Else else>
                              else_action: [
                                (command.Simple
                                  blame_tok: <eval>
                                  more_env: []
                                  words: [
                                    {<eval>}
                                    {
                                      (BracedVarSub
                                        left: <Id.Left_DollarBrace '${'>
                                        token: <Id.VSub_Name f>
                                        var_name: f
                                        suffix_op: 
                                          (suffix_op.Unary
                                            op: <Id.VOp1_DPercent '%%'>
                                            arg_word: {<Id.Lit_Other '@'> <Id.Lit_Other '*'>}
                                          )
                                        right: <Id.Right_DollarBrace '}'>
                                      )
                                    }
                                    {(${ Id.VSub_Name args)}
                                  ]
                                  redirects: []
                                  do_fork: T
                                )
                                (command.ControlFlow
                                  keyword: <Id.ControlFlow_Return return>
                                )
                              ]
                              fi_kw: <Id.KW_Fi fi>
                              redirects: []
                            )
                          ]
                          right: <Id.Op_DSemi _>
                        )
                      ]
                      arms_end: <Id.KW_Esac esac>
                      redirects: []
                    )
                  ]
                  right: <Id.KW_Done done>
                )
              redirects: []
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShFunction
      name_tok: <PRINT>
      name: PRINT
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.If
              if_kw: <Id.KW_If if>
              arms: [
                (IfArm
                  keyword: <Id.KW_If if>
                  cond: 
                    (condition.Shell
                      commands: [
                        (command.Sentence
                          child: 
                            (command.DBracket
                              left: <Id.KW_DLeftBracket '[['>
                              expr: (bool_expr.WordTest w:{(DQ (${ Id.VSub_Name __ERROR))})
                              right: <Id.Lit_DRightBracket ']]'>
                              redirects: []
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  then_kw: <Id.KW_Then then>
                  action: [
                    (command.Simple
                      blame_tok: <_pr_str>
                      more_env: []
                      words: [{<_pr_str>} {(DQ (${ Id.VSub_Name __ERROR))} {<yes>}]
                      redirects: []
                      do_fork: T
                    )
                    (command.ShAssignment
                      left: <Id.Lit_VarLike 'r='>
                      pairs: [
                        (AssignPair
                          left: <Id.Lit_VarLike 'r='>
                          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'r='> name:r)
                          op: assign_op.Equal
                          rhs: {(DQ <'Error: '> (${ Id.VSub_Name r))}
                        )
                      ]
                      redirects: []
                    )
                    (command.ShAssignment
                      left: <Id.Lit_VarLike '__ERROR='>
                      pairs: [
                        (AssignPair
                          left: <Id.Lit_VarLike '__ERROR='>
                          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike '__ERROR='> name:__ERROR)
                          op: assign_op.Equal
                          rhs: (rhs_word__Empty)
                        )
                      ]
                      redirects: []
                    )
                  ]
                  spids: [1843 1856]
                )
              ]
              else_kw: <Id.KW_Else else>
              else_action: [
                (command.Simple
                  blame_tok: <_pr_str>
                  more_env: []
                  words: [{<_pr_str>} {(DQ (${ Id.VSub_Number 1))} {<yes>}]
                  redirects: []
                  do_fork: T
                )
              ]
              fi_kw: <Id.KW_Fi fi>
              redirects: []
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: (command.Simple blame_tok:<ENV> more_env:[] words:[{<ENV>}] redirects:[] do_fork:T)
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'REPL_ENV='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'REPL_ENV='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'REPL_ENV='> name:REPL_ENV)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name r))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.ShFunction
      name_tok: <REP>
      name: REP
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.ShAssignment
              left: <Id.Lit_VarLike 'r='>
              pairs: [
                (AssignPair
                  left: <Id.Lit_VarLike 'r='>
                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'r='> name:r)
                  op: assign_op.Equal
                  rhs: (rhs_word__Empty)
                )
              ]
              redirects: []
            )
            (command.Simple
              blame_tok: <READ>
              more_env: []
              words: [{<READ>} {(DQ (${ Id.VSub_Number 1))}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <EVAL>
              more_env: []
              words: [{<EVAL>} {(DQ (${ Id.VSub_Name r))} {(DQ (${ Id.VSub_Name REPL_ENV))}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <PRINT>
              more_env: []
              words: [{<PRINT>} {(DQ (${ Id.VSub_Name r))}]
              redirects: []
              do_fork: T
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShFunction
      name_tok: <_fref>
      name: _fref
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <_symbol>
                  more_env: []
                  words: [{<_symbol>} {(DQ (${ Id.VSub_Number 1))}]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <local>
              more_env: []
              words: [{<local>} {<Id.Lit_VarLike 'sym='> (DQ (${ Id.VSub_Name r))}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <_function>
              more_env: []
              words: [
                {<_function>}
                {
                  (DQ (${ Id.VSub_Number 2) <' '> 
                    (word_part.EscapedLiteral
                      token: <Id.Lit_EscapedChar '\\"'>
                      ch: '"'
                    ) (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\$'> ch:'$') <'{@}'> 
                    (word_part.EscapedLiteral
                      token: <Id.Lit_EscapedChar '\\"'>
                      ch: '"'
                    )
                  )
                }
              ]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <ENV_SET>
              more_env: []
              words: [
                {<ENV_SET>}
                {(DQ (${ Id.VSub_Name REPL_ENV))}
                {(DQ (${ Id.VSub_Name sym))}
                {(DQ (${ Id.VSub_Name r))}
              ]
              redirects: []
              do_fork: T
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ForEach
      keyword: <Id.KW_For for>
      iter_names: [n]
      iterable: 
        (for_iter.Words
          words: [
            {
              (DQ 
                (BracedVarSub
                  left: <Id.Left_DollarBrace '${'>
                  token: <Id.VSub_Name core_ns>
                  var_name: core_ns
                  prefix_op: <Id.VSub_Bang '!'>
                  bracket_op: (bracket_op.WholeArray op_id:Id.Lit_At)
                  right: <Id.Right_DollarBrace '}'>
                )
              )
            }
          ]
        )
      semi_tok: <Id.Op_Semi _>
      body: 
        (command.DoGroup
          left: <Id.KW_Do do>
          children: [
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <_fref>
                  more_env: []
                  words: [
                    {<_fref>}
                    {(DQ (${ Id.VSub_Name n))}
                    {
                      (DQ 
                        (BracedVarSub
                          left: <Id.Left_DollarBrace '${'>
                          token: <Id.VSub_Name core_ns>
                          var_name: core_ns
                          bracket_op: (bracket_op.ArrayIndex expr:{(DQ (${ Id.VSub_Name n))})
                          right: <Id.Right_DollarBrace '}'>
                        )
                      )
                    }
                  ]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
          ]
          right: <Id.KW_Done done>
        )
      redirects: []
    )
    (command.ShFunction
      name_tok: <_eval>
      name: _eval
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <EVAL>
                  more_env: []
                  words: [{<EVAL>} {(DQ (${ Id.VSub_Number 1))} {(DQ (${ Id.VSub_Name REPL_ENV))}]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.Simple
      blame_tok: <_fref>
      more_env: []
      words: [{<_fref>} {(DQ <eval>)} {<_eval>}]
      redirects: []
      do_fork: T
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <_list>
              more_env: []
              words: [{<_list>}]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'argv='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'argv='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'argv='> name:argv)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name r))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.ForEach
      keyword: <Id.KW_For for>
      iter_names: [_arg]
      iterable: 
        (for_iter.Words
          words: [
            {
              (DQ 
                (BracedVarSub
                  left: <Id.Left_DollarBrace '${'>
                  token: <Id.VSub_At '@'>
                  var_name: '@'
                  suffix_op: (suffix_op.Slice begin:{<Id.Lit_Digits 2>})
                  right: <Id.Arith_RBrace _>
                )
              )
            }
          ]
        )
      semi_tok: <Id.Op_Semi _>
      body: 
        (command.DoGroup
          left: <Id.KW_Do do>
          children: [
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <_string>
                  more_env: []
                  words: [{<_string>} {(DQ (${ Id.VSub_Name _arg))}]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <_conj>
                  more_env: []
                  words: [
                    {<_conj> <Id.KW_Bang '!'>}
                    {(DQ (${ Id.VSub_Name argv))}
                    {(DQ (${ Id.VSub_Name r))}
                  ]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
          ]
          right: <Id.KW_Done done>
        )
      redirects: []
    )
    (command.Simple
      blame_tok: <_symbol>
      more_env: []
      words: [{<_symbol>} {(DQ <__STAR__ARGV__STAR__>)}]
      redirects: []
      do_fork: T
    )
    (command.Sentence
      child: 
        (command.Simple
          blame_tok: <ENV_SET>
          more_env: []
          words: [
            {<ENV_SET>}
            {(DQ (${ Id.VSub_Name REPL_ENV))}
            {(DQ (${ Id.VSub_Name r))}
            {(DQ (${ Id.VSub_Name argv))}
          ]
          redirects: []
          do_fork: T
        )
      terminator: <Id.Op_Semi _>
    )
    (command.Simple
      blame_tok: <REP>
      more_env: []
      words: [{<REP>} {(DQ <'(def! not (fn* (a) (if a false true)))'>)}]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <REP>
      more_env: []
      words: [
        {<REP>}
        {
          (DQ <'(def! load-file (fn* (f) (eval (read-string (str '> 
            (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') <'(do '> (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') <' (slurp f) '> 
            (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') <')'> (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') <')))))'>
          )
        }
      ]
      redirects: []
      do_fork: T
    )
    (command.If
      if_kw: <Id.KW_If if>
      arms: [
        (IfArm
          keyword: <Id.KW_If if>
          cond: 
            (condition.Shell
              commands: [
                (command.Sentence
                  child: 
                    (command.DBracket
                      left: <Id.KW_DLeftBracket '[['>
                      expr: (bool_expr.WordTest w:{(DQ (${ Id.VSub_Number 1))})
                      right: <Id.Lit_DRightBracket ']]'>
                      redirects: []
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
            )
          then_kw: <Id.KW_Then then>
          action: [
            (command.Simple
              blame_tok: <REP>
              more_env: []
              words: [
                {<REP>}
                {
                  (DQ <'(load-file '> 
                    (word_part.EscapedLiteral
                      token: <Id.Lit_EscapedChar '\\"'>
                      ch: '"'
                    ) (${ Id.VSub_Number 1) (word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\"'> ch:'"') <')'>
                  )
                }
              ]
              redirects: []
              do_fork: T
            )
            (command.ControlFlow keyword:<Id.ControlFlow_Exit exit> arg_word:{<0>})
          ]
          spids: [2210 2223]
        )
      ]
      else_action: []
      fi_kw: <Id.KW_Fi fi>
      redirects: []
    )
    (command.WhileUntil
      keyword: <Id.KW_While while>
      cond: 
        (condition.Shell
          commands: [
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <true>
                  more_env: []
                  words: [{<true>}]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
          ]
        )
      body: 
        (command.DoGroup
          left: <Id.KW_Do do>
          children: [
            (command.AndOr
              children: [
                (command.Simple
                  blame_tok: <READLINE>
                  more_env: []
                  words: [{<READLINE>} {(DQ <'user> '>)}]
                  redirects: []
                  do_fork: T
                )
                (command.ControlFlow
                  keyword: <Id.ControlFlow_Exit exit>
                  arg_word: {(DQ ($ Id.VSub_QMark '?'))}
                )
              ]
              ops: [<Id.Op_DPipe _>]
            )
            (command.AndOr
              children: [
                (command.DBracket
                  left: <Id.KW_DLeftBracket '[['>
                  expr: (bool_expr.WordTest w:{(DQ (${ Id.VSub_Name r))})
                  right: <Id.Lit_DRightBracket ']]'>
                  redirects: []
                )
                (command.Simple
                  blame_tok: <REP>
                  more_env: []
                  words: [{<REP>} {(DQ (${ Id.VSub_Name r))}]
                  redirects: []
                  do_fork: T
                )
                (command.Simple
                  blame_tok: <echo>
                  more_env: []
                  words: [{<echo>} {(DQ (${ Id.VSub_Name r))}]
                  redirects: []
                  do_fork: T
                )
              ]
              ops: [<Id.Op_DAmp _> <Id.Op_DAmp _>]
            )
          ]
          right: <Id.KW_Done done>
        )
      redirects: []
    )
  ]
)