(command.CommandList
  children: [
    (command.Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (lhs_expr.LhsName name:REASON_DIR spids:[8])
          op: Equal
          rhs: 
            {
              (word_part.CommandSubPart
                command_list: (command.CommandList children:[(C {(ocamlfind)} {(query)} {(reason)})])
                left_token: <Left_Backtick '`'>
                spids: [9 15]
              )
            }
          spids: [8]
        )
      ]
      spids: [8]
    )
    (C {(ocamlfind)} {(ocamldoc)} {(-g)} {($ VSub_DollarName '$REASON_DIR') (/reasondoc.cma)} 
      {($ VSub_At '$@')}
    )
  ]
)