Variable: combobulate-ocaml-procedures-hierarchy

((:activation-nodes
  ((:nodes ("match_expression" "try_expression" "function_expression")
	   :position at))
  :selector
  (:choose node :match-children (:match-rules ("match_case"))))
 (:activation-nodes ((:nodes ("match_case") :position at)) :selector
		    (:choose node :match-children t))
 (:activation-nodes ((:nodes ("value_definition"))) :selector
		    (:choose node :match-query
			     (:query ((let_binding body: (_) @match))
				     :engine treesitter)))
 (:activation-nodes
  ((:nodes ("let_expression" "let_open_expression"))) :selector
  (:choose node :match-children
	   (:match-rules
	    ("let_expression" "let_open_expression"
	     "application_expression"))))
 (:activation-nodes ((:nodes ("value_definition") :position at))
		    :selector
		    (:choose node :match-children
			     (:match-rules ("let_binding" "attribute"))))
 (:activation-nodes
  ((:nodes ("let_binding" "fun_expression") :position at)) :selector
  (:choose node :match-children t))
 (:activation-nodes ((:nodes ("let_expression") :position at))
		    :selector
		    (:choose node :match-children
			     (:match-rules
			      ("value_definition"
			       (rule "_sequence_expression")
			       (rule "_simple_expression")))))
 (:activation-nodes ((:nodes ("application_expression") :position at))
		    :selector (:choose node :match-children t))
 (:activation-nodes
  ((:nodes ("constructor_declaration") :has-parent
	   ("variant_declaration") :position at))
  :selector
  (:choose node :match-children (:match-rules ("constructed_type"))))
 (:activation-nodes
  ((:nodes
    ((rule "_pattern") "constructor_path" "value_path" "value_pattern")
    :has-parent ("match_case") :position at))
  :selector
  (:choose parent :match-children
	   (:match-rules
	    ((rule "_sequence_expression") (rule "_simple_expression")
	     "refutation_case" "guard"))))
 (:activation-nodes ((:nodes ("function_type") :position at))
		    :selector
		    (:choose node :match-children
			     (:match-rules
			      ((rule "_type") (rule "_simple_type")))))
 (:activation-nodes ((:nodes ("include_module") :position at))
		    :selector
		    (:choose node :match-children
			     (:match-rules
			      ((rule "_module_expression")
			       (rule "_simple_module_expression")))))
 (:activation-nodes ((:nodes ("attribute") :position at)) :selector
		    (:choose node :match-children
			     (:match-rules ("attribute_payload"))))
 (:activation-nodes
  ((:nodes
    ("field_get_expression" "value_path" "typed_pattern"
     "parenthesized_operator" "parenthesized_expression"
     "parenthesized_pattern" "tuple_pattern" "application_expression"
     "constructor_declaration" "parameter")
    :position at)
   (:nodes ((rule "polymorphic_variant_type"))))
  :selector (:choose node :match-children (:discard-rules ("|"))))
 (:activation-nodes
  ((:nodes ("class_name") :has-parent ("class_binding"))) :selector
  (:choose parent :match-children (:match-rules ("object_expression"))))
 (:activation-nodes
  ((:nodes
    ("object_expression" "class_body_type" (rule "class_definition")
     (rule "object_expression") (rule "class_binding"))
    :position at))
  :selector
  (:choose node :match-children (:discard-rules ("tag_specification"))))
 (:activation-nodes ((:nodes ("class_definition"))) :selector
		    (:choose node :match-query
			     (:query
			      ((class_binding
				[(class_name) (object_expression)]
				@match))
			      :engine treesitter)))
 (:activation-nodes ((:nodes ("class_type_definition"))) :selector
		    (:choose node :match-query
			     (:query
			      ((class_type_binding
				[(class_type_name) (class_body_type)]
				@match))
			      :engine treesitter)))
 (:activation-nodes
  ((:nodes ("constructor_name") :has-parent
	   ("constructor_declaration")))
  :selector
  (:choose parent :match-children (:nodes ("type_constructor_path"))))
 (:activation-nodes ((:nodes ("type_constructor_path"))) :selector
		    (:choose node :match-children
			     (:nodes ("type_constructor"))))
 (:activation-nodes ((:nodes ("signature") :position at)) :selector
		    (:choose node :match-children
			     (:match-rules ((rule "signature")))))
 (:activation-nodes ((:nodes ("structure") :position at)) :selector
		    (:choose node :match-children
			     (:match-rules ((rule "structure")))))
 (:activation-nodes
  ((:nodes ("signature" "structure" "module_name" "module_path")
	   :has-ancestor
	   ("module_definition" "module_type_definition"
	    "package_expression"))
   (:nodes
    ((rule "module_definition") (rule "record_declaration")
     (rule "attribute_payload") (rule "function_type")
     (irule "function_type") (irule "set_expression")
     (irule "infix_expression") (rule "constructor_declaration")
     (rule "type_binding") (rule "method_definition")
     (irule "value_path") (irule "signature") (irule "structure")
     (rule "_signature_item") (rule "_structure_item"))))
  :selector (:choose node :match-children t))
 (:activation-nodes ((:nodes (rule "compilation_unit"))) :selector
		    (:choose node :match-children t)))