(command.CommandList
  children: [
    (C {<_Dbg_help_add>} {<undisplay>} 
      {
        (DQ <'**undisplay** *display-number*...\n'> <'\n'> 
          <
'Cancel some expressions to be displayed when program stops. Arguments are the code numbers\n'
          > <'of the expressions to stop displaying.\n'> <'\n'> <'Examples:\n'> <'---------\n'> <'\n'> 
          <'    undisplay 0     # Removes display statement 0\n'> <'    undisplay 0 3 4 # Removes display statements 0, 3, and 4\n'> <'\n'> <'See also:\n'> 
          <'---------\n'> <'\n'> <'*display* and *info display*.'>
        )
      }
    )
    (command.ShFunction
      name: _Dbg_do_undisplay
      body: 
        (BraceGroup
          children: [
            (C {<typeset>} {<-i>} {<del>})
            (command.If
              arms: [
                (if_arm
                  cond: 
                    (condition.Shell
                      commands: [
                        (command.Sentence
                          child: 
                            (command.DParen
                              child: 
                                (arith_expr.Binary
                                  op_id: Id.Arith_DEqual
                                  left: {<Id.Lit_Digits 0>}
                                  right: {($ Id.VSub_Pound '$#')}
                                )
                            )
                          terminator: <Id.Op_Semi _>
                        )
                      ]
                    )
                  action: [
                    (C {<_Dbg_errmsg>} {(SQ <'You need to pass in some display numbers.'>)})
                    (command.ControlFlow
                      token: <Id.ControlFlow_Return return>
                      arg_word: {<0>}
                    )
                  ]
                  spids: [100 115]
                )
              ]
            )
            (command.ForEach
              iter_name: del
              iter_words: [{($ Id.VSub_At '$@')}]
              do_arg_iter: F
              body: 
                (command.DoGroup
                  children: [
                    (command.If
                      arms: [
                        (if_arm
                          cond: 
                            (condition.Shell
                              commands: [
                                (command.Sentence
                                  child: 
                                    (C {<Id.Lit_LBracket '['>} {<-n>} 
                                      {
                                        (DQ 
                                          (braced_var_sub
                                            token: <Id.VSub_Name _Dbg_disp_exp>
                                            bracket_op: 
                                              (bracket_op.ArrayIndex
                                                expr: {($ Id.VSub_DollarName '$del')}
                                              )
                                          )
                                        )
                                      } {<Id.Lit_RBracket ']'>}
                                    )
                                  terminator: <Id.Op_Semi _>
                                )
                              ]
                            )
                          action: [
                            (C {<_Dbg_write_journal_eval>} 
                              {(DQ <'unset _Dbg_disp_exp['> ($ Id.VSub_DollarName '$del') <']'>)}
                            )
                            (C {<_Dbg_write_journal_eval>} 
                              {(DQ <'unset _Dbg_disp_enable['> ($ Id.VSub_DollarName '$del') <']'>)}
                            )
                            (C {<_Dbg_msg>} 
                              {(DQ <'Display entry '> ($ Id.VSub_DollarName '$del') <' unset.'>)}
                            )
                          ]
                          spids: [147 166]
                        )
                      ]
                      else_action: [
                        (C {<_Dbg_msg>} 
                          {
                            (DQ <'Display entry '> ($ Id.VSub_DollarName '$del') 
                              <' doesn\'t exist, so nothing done.'>
                            )
                          }
                        )
                      ]
                    )
                  ]
                )
            )
            (command.ControlFlow token:<Id.ControlFlow_Return return> arg_word:{<0>})
          ]
        )
    )
  ]
)