(command.CommandList
  children: [
    (command.Simple
      blame_tok: <typeset>
      more_env: []
      words: [{<typeset>} {<-a>} {<_Dbg_override_filenames>}]
      redirects: []
      do_fork: T
    )
    (command.ShFunction
      keyword: <Id.KW_Function function>
      name_tok: <_Dbg_progess_show>
      name: _Dbg_progess_show
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.Simple
              blame_tok: <typeset>
              more_env: []
              words: [{<typeset>} {<Id.Lit_VarLike 'title='> ($ Id.VSub_Number 1)}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <typeset>
              more_env: []
              words: [{<typeset>} {<-i>} {<Id.Lit_VarLike 'max_value='> ($ Id.VSub_Number 2)}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <typeset>
              more_env: []
              words: [{<typeset>} {<-i>} {<Id.Lit_VarLike 'current_value='> ($ Id.VSub_Number 3)}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <typeset>
              more_env: []
              words: [{<typeset>} {<-i>} {<Id.Lit_VarLike 'max_length='> <40>}]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <typeset>
              more_env: []
              words: [{<typeset>} {<-i>} {<current_length>}]
              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.DParen
                              left: <Id.Op_DLeftParen _>
                              child: 
                                (arith_expr.Binary
                                  op_id: Id.Arith_DEqual
                                  left: ($ Id.Lit_ArithVarLike max_value)
                                  right: {<Id.Lit_Digits 0>}
                                )
                              right: <Id.Op_DRightParen _>
                              redirects: []
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  then_kw: <Id.KW_Then then>
                  action: [
                    (command.ShAssignment
                      left: <Id.Lit_VarLike 'current_length='>
                      pairs: [
                        (AssignPair
                          left: <Id.Lit_VarLike 'current_length='>
                          lhs: 
                            (sh_lhs_expr.Name
                              left: <Id.Lit_VarLike 'current_length='>
                              name: current_length
                            )
                          op: assign_op.Equal
                          rhs: {(${ Id.VSub_Name max_length)}
                        )
                      ]
                      redirects: []
                    )
                  ]
                  spids: [152 167]
                )
              ]
              else_kw: <Id.KW_Else else>
              else_action: [
                (command.ShAssignment
                  left: <Id.Lit_VarLike 'current_length='>
                  pairs: [
                    (AssignPair
                      left: <Id.Lit_VarLike 'current_length='>
                      lhs: 
                        (sh_lhs_expr.Name
                          left: <Id.Lit_VarLike 'current_length='>
                          name: current_length
                        )
                      op: assign_op.Equal
                      rhs: 
                        {
                          (word_part.ArithSub
                            left: <Id.Left_DollarDParen '$(('>
                            anode: 
                              (arith_expr.Binary
                                op_id: Id.Arith_Slash
                                left: 
                                  (arith_expr.Binary
                                    op_id: Id.Arith_Star
                                    left: {(${ Id.VSub_Name max_length)}
                                    right: {(${ Id.VSub_Name current_value)}
                                  )
                                right: {(${ Id.VSub_Name max_value)}
                              )
                            right: <Id.Right_DollarDParen _>
                          )
                        }
                    )
                  ]
                  redirects: []
                )
              ]
              fi_kw: <Id.KW_Fi fi>
              redirects: []
            )
            (command.Simple
              blame_tok: <_Dbg_progess_show_internal>
              more_env: []
              words: [
                {<_Dbg_progess_show_internal>}
                {(DQ ($ Id.VSub_Number 1))}
                {(${ Id.VSub_Name max_length)}
                {(${ Id.VSub_Name current_length)}
              ]
              redirects: []
              do_fork: T
            )
            (command.Simple
              blame_tok: <_Dbg_printf_nocr>
              more_env: []
              words: [
                {<_Dbg_printf_nocr>}
                {(SQ <' %3d%%'>)}
                {
                  (DQ 
                    (word_part.ArithSub
                      left: <Id.Left_DollarDParen '$(('>
                      anode: 
                        (arith_expr.Binary
                          op_id: Id.Arith_Slash
                          left: 
                            (arith_expr.Binary
                              op_id: Id.Arith_Star
                              left: {<Id.Lit_Digits 100>}
                              right: {(${ Id.VSub_Name current_value)}
                            )
                          right: {(${ Id.VSub_Name max_value)}
                        )
                      right: <Id.Right_DollarDParen _>
                    )
                  )
                }
              ]
              redirects: []
              do_fork: T
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShFunction
      keyword: <Id.KW_Function function>
      name_tok: <_Dbg_progess_show_internal>
      name: _Dbg_progess_show_internal
      body: 
        (BraceGroup
          left: <Id.Lit_LBrace '{'>
          children: [
            (command.Simple
              blame_tok: <typeset>
              more_env: []
              words: [{<typeset>} {<-i>} {<Id.Lit_VarLike 'i='> <0>}]
              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: {<t>}
                                  right: {($ Id.VSub_DollarName EMACS)}
                                )
                              right: <Id.Lit_DRightBracket ']]'>
                              redirects: []
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  then_kw: <Id.KW_Then then>
                  action: [
                    (command.Simple
                      blame_tok: <_Dbg_msg_nocr>
                      more_env: []
                      words: [
                        {<_Dbg_msg_nocr>}
                        {
                          (DQ <Id.Lit_BadBackslash '\\'> <r> <Id.Lit_BadBackslash '\\'> <b> 
                            <Id.Lit_BadBackslash '\\'> <n>
                          )
                        }
                      ]
                      redirects: []
                      do_fork: T
                    )
                  ]
                  spids: [287 300]
                )
              ]
              else_kw: <Id.KW_Else else>
              else_action: [
                (command.Simple
                  blame_tok: <_Dbg_msg_nocr>
                  more_env: []
                  words: [
                    {<_Dbg_msg_nocr>}
                    {(DQ <Id.Lit_BadBackslash '\\'> <r> <Id.Lit_BadBackslash '\\'> <b>)}
                  ]
                  redirects: []
                  do_fork: T
                )
              ]
              fi_kw: <Id.KW_Fi fi>
              redirects: []
            )
            (command.Simple
              blame_tok: <_Dbg_msg_nocr>
              more_env: []
              words: [{<_Dbg_msg_nocr>} {(DQ ($ Id.VSub_Number 1) <': ['>)}]
              redirects: []
              do_fork: T
            )
            (command.ForExpr
              keyword: <Id.KW_For for>
              init: 
                (arith_expr.BinaryAssign
                  op_id: Id.Arith_Equal
                  left: ($ Id.Lit_ArithVarLike i)
                  right: {<Id.Lit_Digits 0>}
                )
              cond: 
                (arith_expr.Binary
                  op_id: Id.Arith_Less
                  left: ($ Id.Lit_ArithVarLike i)
                  right: {($ Id.VSub_Number 3)}
                )
              update: (arith_expr.UnaryAssign op_id:Id.Node_PostDPlus child:($ Id.Lit_ArithVarLike i))
              body: 
                (command.DoGroup
                  left: <Id.KW_Do do>
                  children: [
                    (command.Simple
                      blame_tok: <_Dbg_msg_nocr>
                      more_env: []
                      words: [{<_Dbg_msg_nocr>} {(DQ <'='>)}]
                      redirects: []
                      do_fork: T
                    )
                  ]
                  right: <Id.KW_Done done>
                )
              redirects: []
            )
            (command.Simple
              blame_tok: <_Dbg_msg_nocr>
              more_env: []
              words: [{<_Dbg_msg_nocr>} {(SQ <'>'>)}]
              redirects: []
              do_fork: T
            )
            (command.ForExpr
              keyword: <Id.KW_For for>
              init: 
                (arith_expr.BinaryAssign
                  op_id: Id.Arith_Equal
                  left: ($ Id.Lit_ArithVarLike i)
                  right: {<Id.Lit_Digits 0>}
                )
              cond: 
                (arith_expr.Binary
                  op_id: Id.Arith_Less
                  left: ($ Id.Lit_ArithVarLike i)
                  right: 
                    (arith_expr.Binary
                      op_id: Id.Arith_Minus
                      left: {($ Id.VSub_Number 2)}
                      right: {($ Id.VSub_Number 3)}
                    )
                )
              update: (arith_expr.UnaryAssign op_id:Id.Node_PostDPlus child:($ Id.Lit_ArithVarLike i))
              body: 
                (command.DoGroup
                  left: <Id.KW_Do do>
                  children: [
                    (command.Simple
                      blame_tok: <_Dbg_msg_nocr>
                      more_env: []
                      words: [{<_Dbg_msg_nocr>} {(SQ <' '>)}]
                      redirects: []
                      do_fork: T
                    )
                  ]
                  right: <Id.KW_Done done>
                )
              redirects: []
            )
            (command.Simple
              blame_tok: <_Dbg_msg_nocr>
              more_env: []
              words: [{<_Dbg_msg_nocr>} {(SQ <']'>)}]
              redirects: []
              do_fork: T
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
    (command.ShFunction
      keyword: <Id.KW_Function function>
      name_tok: <_Dbg_progess_done>
      name: _Dbg_progess_done
      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: <test>
                              more_env: []
                              words: [
                                {<test>}
                                {(DQ <x> ($ Id.VSub_DollarName EMACS))}
                                {<Id.Lit_Equals '='>}
                                {<xt>}
                              ]
                              redirects: []
                              do_fork: T
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  then_kw: <Id.KW_Then then>
                  action: [
                    (command.Simple
                      blame_tok: <_Dbg_msg_nocr>
                      more_env: []
                      words: [
                        {<_Dbg_msg_nocr>}
                        {
                          (DQ <Id.Lit_BadBackslash '\\'> <r> <Id.Lit_BadBackslash '\\'> <b> 
                            <Id.Lit_BadBackslash '\\'> <n>
                          )
                        }
                      ]
                      redirects: []
                      do_fork: T
                    )
                  ]
                  spids: [451 465]
                )
              ]
              else_kw: <Id.KW_Else else>
              else_action: [
                (command.Simple
                  blame_tok: <_Dbg_msg_nocr>
                  more_env: []
                  words: [
                    {<_Dbg_msg_nocr>}
                    {(DQ <Id.Lit_BadBackslash '\\'> <r> <Id.Lit_BadBackslash '\\'> <b>)}
                  ]
                  redirects: []
                  do_fork: T
                )
              ]
              fi_kw: <Id.KW_Fi fi>
              redirects: []
            )
            (command.Simple
              blame_tok: <_Dbg_msg>
              more_env: []
              words: [{<_Dbg_msg>} {($ Id.VSub_Number 1)}]
              redirects: []
              do_fork: T
            )
          ]
          redirects: []
          right: <Id.Lit_RBrace '}'>
        )
    )
  ]
)