(command.CommandList
  children: [
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:PATH)
          op: assign_op.Equal
          rhs: {<'/sbin'> <Id.Lit_Colon ':'> <'/bin'>}
          spids: [28]
        )
      ]
    )
    (C {<.>} {<'/lib/lsb/init-functions'>})
    (command.ShFunction
      name: do_start
      body: 
        (BraceGroup
          children: [
            (C {<log_action_msg>} {(DQ <'Will now switch to single-user mode'>)})
            (C {<exec>} {<init>} {<-t1>} {<S>})
          ]
        )
    )
    (command.Case
      to_match: {(DQ ($ Id.VSub_Number '$1'))}
      arms: [
        (case_arm pat_list:[{<start>}] action:[(C {<do_start>})] spids:[74 75 81 -1])
        (case_arm
          pat_list: [{<restart>} {<reload>} {<force-reload>}]
          action: [
            (command.Simple
              words: [
                {<echo>}
                {(DQ <'Error: argument \''> ($ Id.VSub_Number '$1') <'\' not supported'>)}
              ]
              redirects: [(redir op:<Id.Redir_GreatAnd '>&'> loc:(redir_loc.Fd fd:1) arg:{<2>})]
              do_fork: T
            )
            (command.ControlFlow token:<Id.ControlFlow_Exit exit> arg_word:{<3>})
          ]
          spids: [84 89 109 -1]
        )
        (case_arm pat_list:[{<stop>} {<status>}] spids:[112 115 122 -1])
        (case_arm
          pat_list: [{<Id.Lit_Star '*'>}]
          action: [
            (command.Simple
              words: [{<echo>} {(DQ <'Usage: '> ($ Id.VSub_Number '$0') <' start|stop'>)}]
              redirects: [(redir op:<Id.Redir_GreatAnd '>&'> loc:(redir_loc.Fd fd:1) arg:{<2>})]
              do_fork: T
            )
            (command.ControlFlow token:<Id.ControlFlow_Exit exit> arg_word:{<3>})
          ]
          spids: [125 126 146 -1]
        )
      ]
    )
  ]
)