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