(command.CommandList
  children: [
    (command.AndOr
      children: [
        (command.Simple
          blame_tok: <Id.Lit_LBracket '['>
          more_env: []
          words: [
            {<Id.Lit_LBracket '['>}
            {
              (BracedVarSub
                left: <Id.Left_DollarBrace '${'>
                token: <Id.VSub_Name CALLABLE_LAMBDA_SH>
                var_name: CALLABLE_LAMBDA_SH
                suffix_op: (suffix_op.Unary op:<Id.VTest_Plus _> arg_word:{<true>})
                right: <Id.Right_DollarBrace '}'>
              )
            }
            {<Id.Lit_RBracket ']'>}
          ]
          redirects: []
          do_fork: T
        )
        (command.ControlFlow keyword:<Id.ControlFlow_Return return>)
      ]
      ops: [<Id.Op_DAmp _>]
    )
    (command.Simple
      blame_tok: <declare>
      more_env: []
      words: [{<declare>} {<-g>} {<Id.Lit_VarLike 'CALLABLE_LAMBDA_SH='> <true>}]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <.>
      more_env: []
      words: [
        {<.>}
        {
          (BracedVarSub
            left: <Id.Left_DollarBrace '${'>
            token: <Id.VSub_Name BASH_SOURCE>
            var_name: BASH_SOURCE
            suffix_op: 
              (suffix_op.Unary
                op: <Id.VOp1_Percent '%'>
                arg_word: {<Id.Lit_Slash '/'> <Id.Lit_Other '*'>}
              )
            right: <Id.Right_DollarBrace '}'>
          ) <'/common.sh'>
        }
      ]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <.>
      more_env: []
      words: [
        {<.>}
        {
          (BracedVarSub
            left: <Id.Left_DollarBrace '${'>
            token: <Id.VSub_Name BASH_SOURCE>
            var_name: BASH_SOURCE
            suffix_op: 
              (suffix_op.Unary
                op: <Id.VOp1_Percent '%'>
                arg_word: {<Id.Lit_Slash '/'> <Id.Lit_Other '*'>}
              )
            right: <Id.Right_DollarBrace '}'>
          ) <'/variables.sh'>
        }
      ]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <.>
      more_env: []
      words: [
        {<.>}
        {
          (BracedVarSub
            left: <Id.Left_DollarBrace '${'>
            token: <Id.VSub_Name BASH_SOURCE>
            var_name: BASH_SOURCE
            suffix_op: 
              (suffix_op.Unary
                op: <Id.VOp1_Percent '%'>
                arg_word: {<Id.Lit_Slash '/'> <Id.Lit_Other '*'>}
              )
            right: <Id.Right_DollarBrace '}'>
          ) <'/variables.linkedlist.sh'>
        }
      ]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <.>
      more_env: []
      words: [
        {<.>}
        {
          (BracedVarSub
            left: <Id.Left_DollarBrace '${'>
            token: <Id.VSub_Name BASH_SOURCE>
            var_name: BASH_SOURCE
            suffix_op: 
              (suffix_op.Unary
                op: <Id.VOp1_Percent '%'>
                arg_word: {<Id.Lit_Slash '/'> <Id.Lit_Other '*'>}
              )
            right: <Id.Right_DollarBrace '}'>
          ) <'/specialforms.sh'>
        }
      ]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <.>
      more_env: []
      words: [
        {<.>}
        {
          (BracedVarSub
            left: <Id.Left_DollarBrace '${'>
            token: <Id.VSub_Name BASH_SOURCE>
            var_name: BASH_SOURCE
            suffix_op: 
              (suffix_op.Unary
                op: <Id.VOp1_Percent '%'>
                arg_word: {<Id.Lit_Slash '/'> <Id.Lit_Other '*'>}
              )
            right: <Id.Right_DollarBrace '}'>
          ) <'/evaluator.sh'>
        }
      ]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <.>
      more_env: []
      words: [
        {<.>}
        {
          (BracedVarSub
            left: <Id.Left_DollarBrace '${'>
            token: <Id.VSub_Name BASH_SOURCE>
            var_name: BASH_SOURCE
            suffix_op: 
              (suffix_op.Unary
                op: <Id.VOp1_Percent '%'>
                arg_word: {<Id.Lit_Slash '/'> <Id.Lit_Other '*'>}
              )
            right: <Id.Right_DollarBrace '}'>
          ) <'/callable.sh'>
        }
      ]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <variable>
      more_env: []
      words: [
        {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <type> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> 
          <define>
        }
        {<Lambda>}
        {<Function>}
      ]
      redirects: []
      do_fork: T
    )
    (command.ShFunction
      keyword: <Id.KW_Function function>
      name_tok: <variable>
      name: 'variable::Lambda::new'
      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.Binary
                                  op_id: Id.BoolBinary_GlobDEqual
                                  left: {(${ Id.VSub_Name VARIABLES_DEBUG)}
                                  right: {<1>}
                                )
                              right: <Id.Lit_DRightBracket ']]'>
                              redirects: []
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  then_kw: <Id.KW_Then then>
                  action: [
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <stderr>
                          more_env: []
                          words: [{<stderr>} {(DQ <'variable::Lambda::new '> (${ Id.VSub_At '@'))}]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                  spids: [170 185]
                )
              ]
              else_action: []
              fi_kw: <Id.KW_Fi fi>
              redirects: []
            )
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <new>}
                {<Lambda>}
                {(DQ (${ Id.VSub_At '@'))}
              ]
              redirects: []
              do_fork: T
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShFunction
      keyword: <Id.KW_Function function>
      name_tok: <variable>
      name: 'variable::Lambda::call'
      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.Binary
                                  op_id: Id.BoolBinary_GlobDEqual
                                  left: {(${ Id.VSub_Name VARIABLES_DEBUG)}
                                  right: {<1>}
                                )
                              right: <Id.Lit_DRightBracket ']]'>
                              redirects: []
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  then_kw: <Id.KW_Then then>
                  action: [
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <stderr>
                          more_env: []
                          words: [{<stderr>} {(DQ <'variable::Lambda::call '> (${ Id.VSub_At '@'))}]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                  spids: [247 262]
                )
              ]
              else_action: []
              fi_kw: <Id.KW_Fi fi>
              redirects: []
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'lambdaToken='> (DQ (${ Id.VSub_Number 1))}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'passedArgs='> (DQ (${ Id.VSub_Number 2))}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <type> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <instanceOfOrExit>
                }
                {(DQ (${ Id.VSub_Name lambdaToken))}
                {<Lambda>}
              ]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <variable>
                  more_env: []
                  words: [
                    {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> <Id.Lit_Colon ':'> 
                      <Id.Lit_Colon ':'> <length>
                    }
                    {($ Id.VSub_DollarName passedArgs)}
                  ]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'passedArgCount='> (DQ (${ Id.VSub_Name RESULT))}]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <variable>
                  more_env: []
                  words: [
                    {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <Lambda> <Id.Lit_Colon ':'> 
                      <Id.Lit_Colon ':'> <getEnv>
                    }
                    {($ Id.VSub_DollarName lambdaToken)}
                  ]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'env='> (DQ (${ Id.VSub_Name RESULT))}]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <variable>
                  more_env: []
                  words: [
                    {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <Lambda> <Id.Lit_Colon ':'> 
                      <Id.Lit_Colon ':'> <getFormalArgs>
                    }
                    {($ Id.VSub_DollarName lambdaToken)}
                  ]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'formalArgs='> (DQ (${ Id.VSub_Name RESULT))}]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <variable>
                  more_env: []
                  words: [
                    {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <Lambda> <Id.Lit_Colon ':'> 
                      <Id.Lit_Colon ':'> <getBody>
                    }
                    {($ Id.VSub_DollarName lambdaToken)}
                  ]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'body='> (DQ (${ Id.VSub_Name RESULT))}]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <variable>
                  more_env: []
                  words: [
                    {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> <Id.Lit_Colon ':'> 
                      <Id.Lit_Colon ':'> <length>
                    }
                    {($ Id.VSub_DollarName formalArgs)}
                  ]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'formalArgCount='> (DQ (${ Id.VSub_Name RESULT))}]
              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_ne
                                  left: {($ Id.VSub_DollarName passedArgCount)}
                                  right: {($ Id.VSub_DollarName formalArgCount)}
                                )
                              right: <Id.Lit_DRightBracket ']]'>
                              redirects: []
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  then_kw: <Id.KW_Then then>
                  action: [
                    (command.Simple
                      blame_tok: <stderr>
                      more_env: []
                      words: [
                        {<stderr>}
                        {
                          (DQ <'lambda: passed arg count ('> (${ Id.VSub_Name passedArgCount) 
                            <') != format arg count ('> (${ Id.VSub_Name formalArgCount) <')'>
                          )
                        }
                      ]
                      redirects: []
                      do_fork: T
                    )
                    (command.ControlFlow
                      keyword: <Id.ControlFlow_Exit exit>
                      arg_word: {<1>}
                    )
                  ]
                  spids: [427 440]
                )
              ]
              else_action: []
              fi_kw: <Id.KW_Fi fi>
              redirects: []
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <environment>
                  more_env: []
                  words: [
                    {<environment> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <pushScope>}
                    {($ Id.VSub_DollarName env)}
                  ]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'runningEnv='> (DQ (${ Id.VSub_Name RESULT))}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<thisKeyToken>}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<thisValueToken>}]
              redirects: []
              do_fork: T
            )
            (command.WhileUntil
              keyword: <Id.KW_While while>
              cond: 
                (condition.Shell
                  commands: [
                    (command.Sentence
                      child: 
                        (command.Pipeline
                          negated: <Id.KW_Bang '!'>
                          children: [
                            (command.Simple
                              blame_tok: <variable>
                              more_env: []
                              words: [
                                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> 
                                  <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <isEmpty_c>
                                }
                                {(DQ (${ Id.VSub_Name formalArgs))}
                              ]
                              redirects: []
                              do_fork: T
                            )
                          ]
                          ops: []
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                )
              body: 
                (command.DoGroup
                  left: <Id.KW_Do do>
                  children: [
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <variable>
                          more_env: []
                          words: [
                            {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> 
                              <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <first>
                            }
                            {(DQ (${ Id.VSub_Name formalArgs))}
                          ]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                    (command.ShAssignment
                      left: <Id.Lit_VarLike 'thisKeyToken='>
                      pairs: [
                        (AssignPair
                          left: <Id.Lit_VarLike 'thisKeyToken='>
                          lhs: 
                            (sh_lhs_expr.Name
                              left: <Id.Lit_VarLike 'thisKeyToken='>
                              name: thisKeyToken
                            )
                          op: assign_op.Equal
                          rhs: {(DQ (${ Id.VSub_Name RESULT))}
                        )
                      ]
                      redirects: []
                    )
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <variable>
                          more_env: []
                          words: [
                            {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> 
                              <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <first>
                            }
                            {(DQ (${ Id.VSub_Name passedArgs))}
                          ]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                    (command.ShAssignment
                      left: <Id.Lit_VarLike 'thisValueToken='>
                      pairs: [
                        (AssignPair
                          left: <Id.Lit_VarLike 'thisValueToken='>
                          lhs: 
                            (sh_lhs_expr.Name
                              left: <Id.Lit_VarLike 'thisValueToken='>
                              name: thisValueToken
                            )
                          op: assign_op.Equal
                          rhs: {(DQ (${ Id.VSub_Name RESULT))}
                        )
                      ]
                      redirects: []
                    )
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <variable>
                          more_env: []
                          words: [
                            {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> 
                              <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <rest>
                            }
                            {(DQ (${ Id.VSub_Name formalArgs))}
                          ]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                    (command.ShAssignment
                      left: <Id.Lit_VarLike 'formalArgs='>
                      pairs: [
                        (AssignPair
                          left: <Id.Lit_VarLike 'formalArgs='>
                          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'formalArgs='> name:formalArgs)
                          op: assign_op.Equal
                          rhs: {(DQ (${ Id.VSub_Name RESULT))}
                        )
                      ]
                      redirects: []
                    )
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <variable>
                          more_env: []
                          words: [
                            {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> 
                              <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <rest>
                            }
                            {(DQ (${ Id.VSub_Name passedArgs))}
                          ]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                    (command.ShAssignment
                      left: <Id.Lit_VarLike 'passedArgs='>
                      pairs: [
                        (AssignPair
                          left: <Id.Lit_VarLike 'passedArgs='>
                          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'passedArgs='> name:passedArgs)
                          op: assign_op.Equal
                          rhs: {(DQ (${ Id.VSub_Name RESULT))}
                        )
                      ]
                      redirects: []
                    )
                    (command.Simple
                      blame_tok: <environment>
                      more_env: []
                      words: [
                        {<environment> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <setVariable>}
                        {(DQ (${ Id.VSub_Name runningEnv))}
                        {($ Id.VSub_DollarName thisKeyToken)}
                        {($ Id.VSub_DollarName thisValueToken)}
                      ]
                      redirects: []
                      do_fork: T
                    )
                  ]
                  right: <Id.KW_Done done>
                )
              redirects: []
            )
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <debug>}
                {($ Id.VSub_DollarName body)}
              ]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<currentSexp>} {<currentResult>}]
              redirects: []
              do_fork: T
            )
            (command.WhileUntil
              keyword: <Id.KW_While while>
              cond: 
                (condition.Shell
                  commands: [
                    (command.Sentence
                      child: 
                        (command.Pipeline
                          negated: <Id.KW_Bang '!'>
                          children: [
                            (command.Simple
                              blame_tok: <variable>
                              more_env: []
                              words: [
                                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> 
                                  <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <isEmpty_c>
                                }
                                {(DQ (${ Id.VSub_Name body))}
                              ]
                              redirects: []
                              do_fork: T
                            )
                          ]
                          ops: []
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                )
              body: 
                (command.DoGroup
                  left: <Id.KW_Do do>
                  children: [
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <variable>
                          more_env: []
                          words: [
                            {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> 
                              <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <first>
                            }
                            {(DQ (${ Id.VSub_Name body))}
                          ]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                    (command.ShAssignment
                      left: <Id.Lit_VarLike 'currentSexp='>
                      pairs: [
                        (AssignPair
                          left: <Id.Lit_VarLike 'currentSexp='>
                          lhs: 
                            (sh_lhs_expr.Name
                              left: <Id.Lit_VarLike 'currentSexp='>
                              name: currentSexp
                            )
                          op: assign_op.Equal
                          rhs: {(${ Id.VSub_Name RESULT)}
                        )
                      ]
                      redirects: []
                    )
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <variable>
                          more_env: []
                          words: [
                            {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> 
                              <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <rest>
                            }
                            {(DQ (${ Id.VSub_Name body))}
                          ]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                    (command.ShAssignment
                      left: <Id.Lit_VarLike 'body='>
                      pairs: [
                        (AssignPair
                          left: <Id.Lit_VarLike 'body='>
                          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'body='> name:body)
                          op: assign_op.Equal
                          rhs: {(${ Id.VSub_Name RESULT)}
                        )
                      ]
                      redirects: []
                    )
                    (command.Simple
                      blame_tok: <evaluator>
                      more_env: []
                      words: [
                        {<evaluator> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <eval>}
                        {($ Id.VSub_DollarName runningEnv)}
                        {($ Id.VSub_DollarName currentSexp)}
                      ]
                      redirects: []
                      do_fork: T
                    )
                    (command.ShAssignment
                      left: <Id.Lit_VarLike 'currentResult='>
                      pairs: [
                        (AssignPair
                          left: <Id.Lit_VarLike 'currentResult='>
                          lhs: 
                            (sh_lhs_expr.Name
                              left: <Id.Lit_VarLike 'currentResult='>
                              name: currentResult
                            )
                          op: assign_op.Equal
                          rhs: {(${ Id.VSub_Name RESULT)}
                        )
                      ]
                      redirects: []
                    )
                  ]
                  right: <Id.KW_Done done>
                )
              redirects: []
            )
            (command.ShAssignment
              left: <Id.Lit_VarLike 'RESULT='>
              pairs: [
                (AssignPair
                  left: <Id.Lit_VarLike 'RESULT='>
                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'RESULT='> name:RESULT)
                  op: assign_op.Equal
                  rhs: {(DQ (${ Id.VSub_Name currentResult))}
                )
              ]
              redirects: []
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShFunction
      keyword: <Id.KW_Function function>
      name_tok: <variable>
      name: 'variable::Lambda::getEnv'
      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.Binary
                                  op_id: Id.BoolBinary_GlobDEqual
                                  left: {(${ Id.VSub_Name VARIABLES_DEBUG)}
                                  right: {<1>}
                                )
                              right: <Id.Lit_DRightBracket ']]'>
                              redirects: []
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  then_kw: <Id.KW_Then then>
                  action: [
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <stderr>
                          more_env: []
                          words: [{<stderr>} {(DQ <'variable::Lambda::getEnv '> (${ Id.VSub_At '@'))}]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                  spids: [764 779]
                )
              ]
              else_action: []
              fi_kw: <Id.KW_Fi fi>
              redirects: []
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'lambdaToken='> (DQ (${ Id.VSub_Number 1))}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <type> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <instanceOfOrExit>
                }
                {(DQ (${ Id.VSub_Name lambdaToken))}
                {<Lambda>}
              ]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <value>}
                {($ Id.VSub_DollarName lambdaToken)}
              ]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [
                {<declare>}
                {<-a>}
                {<Id.Lit_VarLike 'data='> 
                  (ShArrayLiteral
                    left: <Id.Op_LParen _>
                    words: [{(${ Id.VSub_Name RESULT)}]
                    right: <Id.Right_ShArrayLiteral _>
                  )
                }
              ]
              redirects: []
              do_fork: T
            )
            (command.ShAssignment
              left: <Id.Lit_VarLike 'RESULT='>
              pairs: [
                (AssignPair
                  left: <Id.Lit_VarLike 'RESULT='>
                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'RESULT='> name:RESULT)
                  op: assign_op.Equal
                  rhs: 
                    {
                      (DQ 
                        (BracedVarSub
                          left: <Id.Left_DollarBrace '${'>
                          token: <Id.VSub_Name data>
                          var_name: data
                          bracket_op: (bracket_op.ArrayIndex expr:{<Id.Lit_Digits 0>})
                          right: <Id.Right_DollarBrace '}'>
                        )
                      )
                    }
                )
              ]
              redirects: []
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShFunction
      keyword: <Id.KW_Function function>
      name_tok: <variable>
      name: 'variable::Lambda::getFormalArgs'
      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.Binary
                                  op_id: Id.BoolBinary_GlobDEqual
                                  left: {(${ Id.VSub_Name VARIABLES_DEBUG)}
                                  right: {<1>}
                                )
                              right: <Id.Lit_DRightBracket ']]'>
                              redirects: []
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  then_kw: <Id.KW_Then then>
                  action: [
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <stderr>
                          more_env: []
                          words: [
                            {<stderr>}
                            {(DQ <'variable::Lambda::getFormalArgs '> (${ Id.VSub_At '@'))}
                          ]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                  spids: [872 887]
                )
              ]
              else_action: []
              fi_kw: <Id.KW_Fi fi>
              redirects: []
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'lambdaToken='> (DQ (${ Id.VSub_Number 1))}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <type> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <instanceOfOrExit>
                }
                {(DQ (${ Id.VSub_Name lambdaToken))}
                {<Lambda>}
              ]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <value>}
                {($ Id.VSub_DollarName lambdaToken)}
              ]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [
                {<declare>}
                {<-a>}
                {<Id.Lit_VarLike 'data='> 
                  (ShArrayLiteral
                    left: <Id.Op_LParen _>
                    words: [{(${ Id.VSub_Name RESULT)}]
                    right: <Id.Right_ShArrayLiteral _>
                  )
                }
              ]
              redirects: []
              do_fork: T
            )
            (command.ShAssignment
              left: <Id.Lit_VarLike 'RESULT='>
              pairs: [
                (AssignPair
                  left: <Id.Lit_VarLike 'RESULT='>
                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'RESULT='> name:RESULT)
                  op: assign_op.Equal
                  rhs: 
                    {
                      (DQ 
                        (BracedVarSub
                          left: <Id.Left_DollarBrace '${'>
                          token: <Id.VSub_Name data>
                          var_name: data
                          bracket_op: (bracket_op.ArrayIndex expr:{<Id.Lit_Digits 1>})
                          right: <Id.Right_DollarBrace '}'>
                        )
                      )
                    }
                )
              ]
              redirects: []
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShFunction
      keyword: <Id.KW_Function function>
      name_tok: <variable>
      name: 'variable::Lambda::getBody'
      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.Binary
                                  op_id: Id.BoolBinary_GlobDEqual
                                  left: {(${ Id.VSub_Name VARIABLES_DEBUG)}
                                  right: {<1>}
                                )
                              right: <Id.Lit_DRightBracket ']]'>
                              redirects: []
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  then_kw: <Id.KW_Then then>
                  action: [
                    (command.Sentence
                      child: 
                        (command.Simple
                          blame_tok: <stderr>
                          more_env: []
                          words: [{<stderr>} {(DQ <'variable::Lambda::getBody '> (${ Id.VSub_At '@'))}]
                          redirects: []
                          do_fork: T
                        )
                      terminator: <Id.Op_Semi _>
                    )
                  ]
                  spids: [980 995]
                )
              ]
              else_action: []
              fi_kw: <Id.KW_Fi fi>
              redirects: []
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'lambdaToken='> (DQ (${ Id.VSub_Number 1))}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <type> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <instanceOfOrExit>
                }
                {(DQ (${ Id.VSub_Name lambdaToken))}
                {<Lambda>}
              ]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <value>}
                {($ Id.VSub_DollarName lambdaToken)}
              ]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [
                {<declare>}
                {<-a>}
                {<Id.Lit_VarLike 'data='> 
                  (ShArrayLiteral
                    left: <Id.Op_LParen _>
                    words: [{(${ Id.VSub_Name RESULT)}]
                    right: <Id.Right_ShArrayLiteral _>
                  )
                }
              ]
              redirects: []
              do_fork: T
            )
            (command.ShAssignment
              left: <Id.Lit_VarLike 'RESULT='>
              pairs: [
                (AssignPair
                  left: <Id.Lit_VarLike 'RESULT='>
                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'RESULT='> name:RESULT)
                  op: assign_op.Equal
                  rhs: 
                    {
                      (DQ 
                        (BracedVarSub
                          left: <Id.Left_DollarBrace '${'>
                          token: <Id.VSub_Name data>
                          var_name: data
                          bracket_op: (bracket_op.ArrayIndex expr:{<Id.Lit_Digits 2>})
                          right: <Id.Right_DollarBrace '}'>
                        )
                      )
                    }
                )
              ]
              redirects: []
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShFunction
      keyword: <Id.KW_Function function>
      name_tok: <variable>
      name: 'variable::Lambda::toSexp'
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'token='> (DQ (${ Id.VSub_Number 1))}]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <variable>
                  more_env: []
                  words: [
                    {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <Lambda> <Id.Lit_Colon ':'> 
                      <Id.Lit_Colon ':'> <getEnv>
                    }
                    {($ Id.VSub_DollarName token)}
                  ]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'env='> ($ Id.VSub_DollarName RESULT)}]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <variable>
                  more_env: []
                  words: [
                    {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <Lambda> <Id.Lit_Colon ':'> 
                      <Id.Lit_Colon ':'> <getFormalArgs>
                    }
                    {($ Id.VSub_DollarName token)}
                  ]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'args='> ($ Id.VSub_DollarName RESULT)}]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <variable>
                  more_env: []
                  words: [
                    {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <Lambda> <Id.Lit_Colon ':'> 
                      <Id.Lit_Colon ':'> <getBody>
                    }
                    {($ Id.VSub_DollarName token)}
                  ]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'body='> ($ Id.VSub_DollarName RESULT)}]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <variable>
                  more_env: []
                  words: [
                    {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <toSexp>}
                    {($ Id.VSub_DollarName args)}
                  ]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'argsString='> ($ Id.VSub_DollarName RESULT)}]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <variable>
                  more_env: []
                  words: [
                    {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <toSexp>}
                    {($ Id.VSub_DollarName body)}
                  ]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.Simple
              blame_tok: <declare>
              more_env: []
              words: [{<declare>} {<Id.Lit_VarLike 'bodyString='> ($ Id.VSub_DollarName RESULT)}]
              redirects: []
              do_fork: T
            )
            (command.Sentence
              child: 
                (command.Simple
                  blame_tok: <declare>
                  more_env: []
                  words: [{<declare>} {<bodyLen>}]
                  redirects: []
                  do_fork: T
                )
              terminator: <Id.Op_Semi _>
            )
            (command.DParen
              left: <Id.Op_DLeftParen _>
              child: 
                (arith_expr.BinaryAssign
                  op_id: Id.Arith_Equal
                  left: ($ Id.Lit_ArithVarLike bodyLen)
                  right: 
                    (arith_expr.Binary
                      op_id: Id.Arith_Minus
                      left: 
                        {
                          (BracedVarSub
                            left: <Id.Left_DollarBrace '${'>
                            token: <Id.VSub_Name bodyString>
                            var_name: bodyString
                            prefix_op: <Id.VSub_Pound '#'>
                            right: <Id.Right_DollarBrace '}'>
                          )
                        }
                      right: {<Id.Lit_Digits 2>}
                    )
                )
              right: <Id.Op_DRightParen _>
              redirects: []
            )
            (command.ShAssignment
              left: <Id.Lit_VarLike 'bodyString='>
              pairs: [
                (AssignPair
                  left: <Id.Lit_VarLike 'bodyString='>
                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'bodyString='> name:bodyString)
                  op: assign_op.Equal
                  rhs: 
                    {
                      (BracedVarSub
                        left: <Id.Left_DollarBrace '${'>
                        token: <Id.VSub_Name bodyString>
                        var_name: bodyString
                        suffix_op: 
                          (suffix_op.Slice
                            begin: {<Id.Lit_Digits 1>}
                            length: ($ Id.Lit_ArithVarLike bodyLen)
                          )
                        right: <Id.Arith_RBrace _>
                      )
                    }
                )
              ]
              redirects: []
            )
            (command.ShAssignment
              left: <Id.Lit_VarLike 'RESULT='>
              pairs: [
                (AssignPair
                  left: <Id.Lit_VarLike 'RESULT='>
                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'RESULT='> name:RESULT)
                  op: assign_op.Equal
                  rhs: 
                    {
                      (DQ <'(lambda '> (${ Id.VSub_Name argsString) <' '> 
                        ($ Id.VSub_DollarName bodyString) <')'>
                      )
                    }
                )
              ]
              redirects: []
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (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: <Id.Lit_LBracket '['>
                      more_env: []
                      words: [
                        {<Id.Lit_LBracket '['>}
                        {($ Id.VSub_Number 0)}
                        {<Id.KW_Bang '!'> <Id.Lit_Equals '='>}
                        {($ Id.VSub_DollarName BASH_SOURCE)}
                        {<Id.Lit_RBracket ']'>}
                      ]
                      redirects: []
                      do_fork: T
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
            )
          then_kw: <Id.KW_Then then>
          action: [(command.ControlFlow keyword:<Id.ControlFlow_Return return>)]
          spids: [1239 1253]
        )
      ]
      else_action: []
      fi_kw: <Id.KW_Fi fi>
      redirects: []
    )
    (command.Simple
      blame_tok: <.>
      more_env: []
      words: [
        {<.>}
        {
          (BracedVarSub
            left: <Id.Left_DollarBrace '${'>
            token: <Id.VSub_Name BASH_SOURCE>
            var_name: BASH_SOURCE
            suffix_op: 
              (suffix_op.Unary
                op: <Id.VOp1_Percent '%'>
                arg_word: {<Id.Lit_Slash '/'> <Id.Lit_Other '*'>}
              )
            right: <Id.Right_DollarBrace '}'>
          ) <'/test.sh'>
        }
      ]
      redirects: []
      do_fork: T
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <createTestEnv>
              more_env: []
              words: [{<createTestEnv>}]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'lambdaEnv='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'lambdaEnv='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'lambdaEnv='> name:lambdaEnv)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name RESULT))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <new>
                }
              ]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'lambdaArgs='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'lambdaArgs='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'lambdaArgs='> name:lambdaArgs)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name RESULT))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.Simple
      blame_tok: <appendToList>
      more_env: []
      words: [
        {<appendToList>}
        {($ Id.VSub_DollarName lambdaArgs)}
        {<Identifier>}
        {(DQ <x>)}
        {<Identifier>}
        {(DQ <y>)}
      ]
      redirects: []
      do_fork: T
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <new>
                }
              ]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'lambdaBody='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'lambdaBody='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'lambdaBody='> name:lambdaBody)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name RESULT))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <new>
                }
              ]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'lambdaCode='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'lambdaCode='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'lambdaCode='> name:lambdaCode)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name RESULT))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.Simple
      blame_tok: <appendToList>
      more_env: []
      words: [
        {<appendToList>}
        {($ Id.VSub_DollarName lambdaCode)}
        {<Identifier>}
        {(SQ <'*'>)}
        {<Identifier>}
        {(DQ <x>)}
        {<Identifier>}
        {(DQ <y>)}
      ]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <variable>
      more_env: []
      words: [
        {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> <Id.Lit_Colon ':'> 
          <Id.Lit_Colon ':'> <append>
        }
        {($ Id.VSub_DollarName lambdaBody)}
        {($ Id.VSub_DollarName lambdaCode)}
      ]
      redirects: []
      do_fork: T
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <Lambda> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <new>
                }
                {
                  (DQ ($ Id.VSub_DollarName lambdaEnv) <' '> ($ Id.VSub_DollarName lambdaArgs) <' '> 
                    ($ Id.VSub_DollarName lambdaBody)
                  )
                }
              ]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'lambda='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'lambda='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'lambda='> name:lambda)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name RESULT))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <new>
                }
              ]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'callingArgs='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'callingArgs='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'callingArgs='> name:callingArgs)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name RESULT))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.Simple
      blame_tok: <appendToList>
      more_env: []
      words: [{<appendToList>} {($ Id.VSub_DollarName callingArgs)} {<Integer>} {<5>} {<Integer>} {<3>}]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <variable>
      more_env: []
      words: [
        {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <Lambda> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> 
          <call>
        }
        {($ Id.VSub_DollarName lambda)}
        {($ Id.VSub_DollarName callingArgs)}
      ]
      redirects: []
      do_fork: T
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <debug>}
                {(DQ (${ Id.VSub_Name RESULT))}
              ]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.Simple
          blame_tok: <assert>
          more_env: []
          words: [
            {<assert> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <equals>}
            {(DQ <'Integer :: 15'>)}
            {(DQ (${ Id.VSub_Name RESULT))}
            {(DQ <'((lambda (x y) (* x y) 5 3)'>)}
          ]
          redirects: []
          do_fork: T
        )
      ]
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <createTestEnv>
              more_env: []
              words: [{<createTestEnv>}]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'lambdaEnv='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'lambdaEnv='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'lambdaEnv='> name:lambdaEnv)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name RESULT))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.Simple
      blame_tok: <setInEnv>
      more_env: []
      words: [{<setInEnv>} {($ Id.VSub_DollarName lambdaEnv)} {(DQ <y>)} {<Integer>} {<10>}]
      redirects: []
      do_fork: T
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <new>
                }
              ]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'lambdaArgs='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'lambdaArgs='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'lambdaArgs='> name:lambdaArgs)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name RESULT))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.Simple
      blame_tok: <appendToList>
      more_env: []
      words: [{<appendToList>} {($ Id.VSub_DollarName lambdaArgs)} {<Identifier>} {(DQ <x>)}]
      redirects: []
      do_fork: T
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <new>
                }
              ]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'lambdaBody='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'lambdaBody='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'lambdaBody='> name:lambdaBody)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name RESULT))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <new>
                }
              ]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'lambdaCode='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'lambdaCode='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'lambdaCode='> name:lambdaCode)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name RESULT))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.Simple
      blame_tok: <appendToList>
      more_env: []
      words: [
        {<appendToList>}
        {($ Id.VSub_DollarName lambdaCode)}
        {<Identifier>}
        {(SQ <'*'>)}
        {<Identifier>}
        {(DQ <x>)}
        {<Identifier>}
        {(DQ <y>)}
      ]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <variable>
      more_env: []
      words: [
        {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> <Id.Lit_Colon ':'> 
          <Id.Lit_Colon ':'> <append>
        }
        {($ Id.VSub_DollarName lambdaBody)}
        {($ Id.VSub_DollarName lambdaCode)}
      ]
      redirects: []
      do_fork: T
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <Lambda> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <new>
                }
                {
                  (DQ ($ Id.VSub_DollarName lambdaEnv) <' '> ($ Id.VSub_DollarName lambdaArgs) <' '> 
                    ($ Id.VSub_DollarName lambdaBody)
                  )
                }
              ]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'lambda='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'lambda='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'lambda='> name:lambda)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name RESULT))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <LinkedList> <Id.Lit_Colon ':'> 
                  <Id.Lit_Colon ':'> <new>
                }
              ]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.ShAssignment
          left: <Id.Lit_VarLike 'callingArgs='>
          pairs: [
            (AssignPair
              left: <Id.Lit_VarLike 'callingArgs='>
              lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'callingArgs='> name:callingArgs)
              op: assign_op.Equal
              rhs: {(DQ (${ Id.VSub_Name RESULT))}
            )
          ]
          redirects: []
        )
      ]
    )
    (command.Simple
      blame_tok: <appendToList>
      more_env: []
      words: [{<appendToList>} {($ Id.VSub_DollarName callingArgs)} {<Integer>} {<5>}]
      redirects: []
      do_fork: T
    )
    (command.Simple
      blame_tok: <variable>
      more_env: []
      words: [
        {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <Lambda> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> 
          <call>
        }
        {($ Id.VSub_DollarName lambda)}
        {($ Id.VSub_DollarName callingArgs)}
      ]
      redirects: []
      do_fork: T
    )
    (command.CommandList
      children: [
        (command.Sentence
          child: 
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [
                {<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <debug>}
                {(DQ (${ Id.VSub_Name RESULT))}
              ]
              redirects: []
              do_fork: T
            )
          terminator: <Id.Op_Semi _>
        )
        (command.Simple
          blame_tok: <assert>
          more_env: []
          words: [
            {<assert> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <equals>}
            {(DQ <'Integer :: 50'>)}
            {(DQ (${ Id.VSub_Name RESULT))}
            {(DQ <'env(y=10) ((lambda (x) (* x y) 5)'>)}
          ]
          redirects: []
          do_fork: T
        )
      ]
    )
    (command.Simple
      blame_tok: <assert>
      more_env: []
      words: [{<assert> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <report>}]
      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.AndOr
                      children: [
                        (command.Simple
                          blame_tok: <Id.Lit_LBracket '['>
                          more_env: []
                          words: [
                            {<Id.Lit_LBracket '['>}
                            {
                              (BracedVarSub
                                left: <Id.Left_DollarBrace '${'>
                                token: <Id.VSub_Number 1>
                                var_name: 1
                                suffix_op: (suffix_op.Unary op:<Id.VTest_Plus _> arg_word:{<isset>})
                                right: <Id.Right_DollarBrace '}'>
                              )
                            }
                            {<Id.Lit_RBracket ']'>}
                          ]
                          redirects: []
                          do_fork: T
                        )
                        (command.Simple
                          blame_tok: <Id.Lit_LBracket '['>
                          more_env: []
                          words: [
                            {<Id.Lit_LBracket '['>}
                            {(DQ ($ Id.VSub_Number 1))}
                            {<Id.Lit_Equals '='> <Id.Lit_Equals '='>}
                            {(DQ <debug>)}
                            {<Id.Lit_RBracket ']'>}
                          ]
                          redirects: []
                          do_fork: T
                        )
                      ]
                      ops: [<Id.Op_DAmp _>]
                    )
                  terminator: <Id.Op_Semi _>
                )
              ]
            )
          then_kw: <Id.KW_Then then>
          action: [
            (command.Simple
              blame_tok: <variable>
              more_env: []
              words: [{<variable> <Id.Lit_Colon ':'> <Id.Lit_Colon ':'> <printMetadata>}]
              redirects: []
              do_fork: T
            )
          ]
          spids: [1735 1765]
        )
      ]
      else_action: []
      fi_kw: <Id.KW_Fi fi>
      redirects: []
    )
  ]
)