23 |     | Ptyp_constr (a,b) (* of Longident.t loc * core_type list *)
40 |       ptype_params (* : (core_type * (variance * injectivity)) list *);
41 |       ptype_cstrs (*: (core_type * core_type * location) list*) ;   
44 |       ptype_manifest (* : core_type option *);
94 |         pcd_res(* : core_type option *);
23 |     | Ptyp_constr (a,b) (* of Longident.t loc * core_type list *)
41 |       ptype_params (* : (core_type * (variance * injectivity)) list *);
42 |       ptype_cstrs (*: (core_type * core_type * location) list*) ;   
45 |       ptype_manifest (* : core_type option *);
95 |         pcd_res(* : core_type option *);
11 | let process_core_type_desc x : string= "core_Type_desc"
40 | let process_core_type x = "process_core_type"
12 | let process_type_decl_core_type x = "process_type_decl_core_type" 
Warning 32 [unused-value-declaration]: unused value process_type_decl_core_type.
12 | let process_type_decl_core_type x = "process_type_decl_core_type" 
13 | let process_type_decl_core_type_desc x : string= "core_Type_desc" 
23 |     | Ptyp_constr (a,b) (* of Longident.t loc * core_type list *)
40 |       ptype_params (* : (core_type * (variance * injectivity)) list *);
41 |       ptype_cstrs (*: (core_type * core_type * location) list*) ;   
44 |       ptype_manifest (* : core_type option *);
94 |         pcd_res(* : core_type option *);
23 |     | Ptyp_constr (a,b) (* of Longident.t loc * core_type list *)
41 |       ptype_params (* : (core_type * (variance * injectivity)) list *);
42 |       ptype_cstrs (*: (core_type * core_type * location) list*) ;   
45 |       ptype_manifest (* : core_type option *);
95 |         pcd_res(* : core_type option *);
11 | let process_core_type_desc x : string= "core_Type_desc"
40 | let process_core_type x = "process_core_type"
12 | let process_type_decl_core_type x = "process_type_decl_core_type" 
Warning 32 [unused-value-declaration]: unused value process_type_decl_core_type.
12 | let process_type_decl_core_type x = "process_type_decl_core_type" 
13 | let process_type_decl_core_type_desc x : string= "core_Type_desc" 
281 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
281 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
Warning 27 [unused-var-strict]: unused variable core_type.
281 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
Warning 27 [unused-var-strict]: unused variable core_type2.
288 |   | Ptyp_class (a,b) (* of Longident.t loc * core_type list *)
293 |   | Ptyp_alias (a,b) (* of core_type * string loc  *)
293 |   | Ptyp_alias (a,b) (* of core_type * string loc  *)
300 |   | Ptyp_poly (a,b) (* of string loc list * core_type *)
300 |   | Ptyp_poly (a,b) (* of string loc list * core_type *)
426 |     | Ptyp_constr (a,b) (* of Longident.t loc * core_type list *)
441 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
441 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
Warning 27 [unused-var-strict]: unused variable core_type.
441 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
Warning 27 [unused-var-strict]: unused variable core_type2.
449 |   | Ptyp_class (a,b) (* of Longident.t loc * core_type list *)
454 |   | Ptyp_alias (a,b) (* of core_type * string loc  *)
454 |   | Ptyp_alias (a,b) (* of core_type * string loc  *)
461 |   | Ptyp_poly (a,b) (* of string loc list * core_type *)
461 |   | Ptyp_poly (a,b) (* of string loc list * core_type *)
634 |         pcd_res(* : core_type option *);
695 |         ptype_params (* : (core_type * (variance * injectivity)) list *);
696 |         ptype_cstrs (*: (core_type * core_type * location) list*) ;   
699 |         ptype_manifest (* : core_type option *);
281 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
281 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
Warning 27 [unused-var-strict]: unused variable core_type.
281 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
Warning 27 [unused-var-strict]: unused variable core_type2.
288 |   | Ptyp_class (a,b) (* of Longident.t loc * core_type list *)
293 |   | Ptyp_alias (a,b) (* of core_type * string loc  *)
293 |   | Ptyp_alias (a,b) (* of core_type * string loc  *)
300 |   | Ptyp_poly (a,b) (* of string loc list * core_type *)
300 |   | Ptyp_poly (a,b) (* of string loc list * core_type *)
426 |     | Ptyp_constr (a,b) (* of Longident.t loc * core_type list *)
441 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
441 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
Warning 27 [unused-var-strict]: unused variable core_type.
441 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
Warning 27 [unused-var-strict]: unused variable core_type2.
449 |   | Ptyp_class (a,b) (* of Longident.t loc * core_type list *)
454 |   | Ptyp_alias (a,b) (* of core_type * string loc  *)
454 |   | Ptyp_alias (a,b) (* of core_type * string loc  *)
461 |   | Ptyp_poly (a,b) (* of string loc list * core_type *)
461 |   | Ptyp_poly (a,b) (* of string loc list * core_type *)
634 |         pcd_res(* : core_type option *);
695 |         ptype_params (* : (core_type * (variance * injectivity)) list *);
696 |         ptype_cstrs (*: (core_type * core_type * location) list*) ;   
699 |         ptype_manifest (* : core_type option *);
DEBUG2EC:| Coq_tt () -> (process_types_coq_unit__Coq_tt(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Coq_tt"{| Coq_tt () -> (process_types_coq_unit__Coq_tt(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2Erec: let process_type_decl_coq_unit (x:coq_unit):string = match x with {emit_type_decl_kindVARIANT2constructor:"Coq_tt"{| Coq_tt () -> (process_types_coq_unit__Coq_tt(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP 
DEBUG:constructor_declaration_new: constructor:"Coq_tt"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(coq_unit):
DEBUG2EC:| Coq_true () -> (process_types_bool__Coq_true(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Coq_true"{| Coq_true () -> (process_types_bool__Coq_true(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2Erec: let process_type_decl_bool (x:bool):string = match x with {emit_type_decl_kindVARIANT2constructor:"Coq_true"{| Coq_true () -> (process_types_bool__Coq_true(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP 
DEBUG:constructor_declaration_new: constructor:"Coq_false"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(bool):
DEBUG:constructor_declaration_new: constructor:"Coq_true"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Coq_false"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(bool):
DEBUG2EC:| Coq_ii1 (FIXME) -> (process_types_coprod__Coq_ii1(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Coq_ii1"{| Coq_ii1 (FIXME) -> (process_types_coprod__Coq_ii1(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2Erec: let process_type_decl_coprod (x:coprod):string = match x with {emit_type_decl_kindVARIANT2constructor:"Coq_ii1"{| Coq_ii1 (FIXME) -> (process_types_coprod__Coq_ii1(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP 
DEBUG:constructor_declaration_new: constructor:"Coq_ii2"{Pcstr_tuple:ptyp_desc:var-name,my_process_core_type_list:}	|VARIANT(coprod):
DEBUG:constructor_declaration_new: constructor:"Coq_ii1"{Pcstr_tuple:ptyp_desc:var-name,my_process_core_type_list:}	|constructor:"Coq_ii2"{Pcstr_tuple:ptyp_desc:var-name,my_process_core_type_list:}	|VARIANT(coprod):
DEBUG2EC:| O () -> (process_types_nat__O(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"O"{| O () -> (process_types_nat__O(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2Erec: let process_type_decl_nat (x:nat):string = match x with {emit_type_decl_kindVARIANT2constructor:"O"{| O () -> (process_types_nat__O(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP 
DEBUG:Ptyp_constr1 'nat' my_process_core_type_list:DEBUG:constructor_declaration_new: constructor:"S"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"nat|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(nat):
DEBUG:constructor_declaration_new: constructor:"O"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"S"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"nat|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(nat):
DEBUG2EC:| Coq_paths_refl () -> (process_types_paths__Coq_paths_refl(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Coq_paths_refl"{| Coq_paths_refl () -> (process_types_paths__Coq_paths_refl(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2Erec: let process_type_decl_paths (x:paths):string = match x with {emit_type_decl_kindVARIANT2constructor:"Coq_paths_refl"{| Coq_paths_refl () -> (process_types_paths__Coq_paths_refl(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP 
DEBUG:constructor_declaration_new: constructor:"Coq_paths_refl"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(paths):
TOPstructure_item_desc:printdescPstr_type:print_type_decl:"coq_unit" = type variant:constructor:"Coq_tt"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(coq_unit):[process_type_decl_list]
TOPstructure_item_desc:printdescPstr_type:print_type_decl:"bool" = type variant:constructor:"Coq_true"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Coq_false"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(bool):[process_type_decl_list]
TOPstructure_item_desc:printdescPstr_type:print_type_decl:"coprod" = type variant:constructor:"Coq_ii1"{Pcstr_tuple:ptyp_desc:var-name,my_process_core_type_list:}	|constructor:"Coq_ii2"{Pcstr_tuple:ptyp_desc:var-name,my_process_core_type_list:}	|VARIANT(coprod):[process_type_decl_list]
TOPstructure_item_desc:printdescPstr_type:print_type_decl:"nat" = type variant:constructor:"O"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"S"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"nat|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(nat):[process_type_decl_list]
TOPstructure_item_desc:printdescPstr_type:print_type_decl:"paths" = type variant:constructor:"Coq_paths_refl"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(paths):[process_type_decl_list]
DEBUG:Ptyp_constr1 'int' my_process_core_type_list:DEBUG:Ptyp_constr1 'int' my_process_core_type_list:DEBUG:Ptyp_constr1 'int' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:TOPstructure_item_desc:printdescPstr_type:print_type_decl:"a1234567890position" = process_record_kind:"pos_fname1234567890|" body:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:/process_record_kind:"pos_lnum1234567890|" body:ptyp_desc:Ptyp_constr:"int|"->my_process_core_type_list:/process_record_kind:"pos_bol1234567890|" body:ptyp_desc:Ptyp_constr:"int|"->my_process_core_type_list:/process_record_kind:"pos_cnum1234567890|" body:ptyp_desc:Ptyp_constr:"int|"->my_process_core_type_list:/process_record_kind_list[process_type_decl_list]
DEBUG2EC:| Coq_paths_refl () -> (process_types_paths__Coq_paths_refl(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Coq_paths_refl"{| Coq_paths_refl () -> (process_types_paths__Coq_paths_refl(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2Erec: let process_type_decl_paths (x:paths):string = match x with {emit_type_decl_kindVARIANT2constructor:"Coq_paths_refl"{| Coq_paths_refl () -> (process_types_paths__Coq_paths_refl(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP 
DEBUG:constructor_declaration_new: constructor:"Coq_paths_refl"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(paths):
TOPstructure_item_desc:printdescPstr_type:print_type_decl:"paths" = type variant:constructor:"Coq_paths_refl"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(paths):[process_type_decl_list]
DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'position' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'location' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'attribute' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'row_field' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'object_field' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'pattern' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'expression' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'case' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'letop' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'binding_op' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'value_description' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'type_declaration' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'label_declaration' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'constructor_declaration' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'type_extension' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'extension_constructor' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'type_exception' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'class_type' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'class_signature' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'class_type_field' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'class_expr' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'class_structure' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'class_field' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'module_type' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'signature_item' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'module_declaration' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'module_substitution' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'module_type_declaration' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'module_expr' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'structure_item' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'value_binding' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'module_binding' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'toplevel_directive' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'directive_argument' my_process_core_type_list:TOPstructure_item_desc:printdescmodule_open
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_attributes| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("attributes")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_row_field_desc| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("process_row_field_desc")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_var_name| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("var_name")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_location| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("location")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_loc| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("loc")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_core_type_desc| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("core_Type_desc")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_payload| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("loc")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_attribute| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_bool| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("bool")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_position| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("post")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_int| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:string_of_int|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_expression| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_extension| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_functor_parameter| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_include_declaration| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_list| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_longident_loc| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_longident| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_module_binding| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_module_expr| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_module_type_declaration| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_module_type| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_open_declaration| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_option| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_rec_flag| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_string| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_structure| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_toplevel_directive| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_declaration| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_exception| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_extension| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_value_description| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("x")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_core_type| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:CONSTANTprocess_constantPconst_string("process_core_type");;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_position| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"position|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_string|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pos_fname|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_int|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pos_lnum|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_int|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pos_bol|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_int|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pos_cnum|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_location| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_position|process_list1process_arg_labelNoLabel|EXPR:IDENTident:loc_start|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_position|process_list1process_arg_labelNoLabel|EXPR:IDENTident:loc_end|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_bool|process_list1process_arg_labelNoLabel|EXPR:IDENTident:loc_ghost|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_loc| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_var_name|process_list1process_arg_labelNoLabel|EXPR:IDENTident:txt|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:loc|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_attribute| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"attribute|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:attr_name|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_payload|process_list1process_arg_labelNoLabel|EXPR:IDENTident:attr_payload|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:attr_loc|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_core_type| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_core_type_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptyp_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptyp_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location_stack|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptyp_loc_stack|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptyp_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_row_field| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"row_field|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_row_field_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:prf_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:prf_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:prf_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_object_field| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"object_field|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_object_field_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pof_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pof_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pof_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_pattern| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_pattern_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ppat_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ppat_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location_stack|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ppat_loc_stack|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ppat_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_expression| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pexp_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pexp_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location_stack|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pexp_loc_stack|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pexp_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_case| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"case|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_pattern|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pc_lhs|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_option|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pc_guard|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pc_rhs|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_letop| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"letop|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_binding_op|process_list1process_arg_labelNoLabel|EXPR:IDENTident:let_|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ands|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:body|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_binding_op| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"binding_op|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pbop_op|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_pattern|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pbop_pat|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pbop_exp|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pbop_loc|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_value_description| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"value_description|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pval_name|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_core_type|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pval_type|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pval_prim|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pval_attributes|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pval_loc|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_type_declaration| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"type_declaration|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptype_name|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptype_params|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptype_cstrs|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_type_kind|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptype_kind|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_private_flag|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptype_private|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_option|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptype_manifest|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptype_attributes|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptype_loc|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_label_declaration| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"label_declaration|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pld_name|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_mutable_flag|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pld_mutable|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_core_type|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pld_type|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pld_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pld_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_constructor_declaration| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"constructor_declaration|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcd_name|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcd_vars|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_constructor_arguments|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcd_args|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_option|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcd_res|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcd_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcd_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_type_extension| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"type_extension|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_longident_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptyext_path|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptyext_params|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptyext_constructors|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_private_flag|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptyext_private|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptyext_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptyext_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_extension_constructor| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"extension_constructor|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pext_name|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_extension_constructor_kind|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pext_kind|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pext_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pext_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_type_exception| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"type_exception|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_extension_constructor|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptyexn_constructor|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptyexn_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ptyexn_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_class_type| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"class_type|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_class_type_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcty_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcty_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcty_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_class_signature| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"class_signature|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_core_type|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcsig_self|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcsig_fields|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_class_type_field| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"class_type_field|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_class_type_field_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pctf_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pctf_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pctf_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_class_infos| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_virtual_flag|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pci_virt|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pci_params|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pci_name|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_var_name|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pci_expr|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pci_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pci_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_class_expr| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"class_expr|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_class_expr_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcl_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcl_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcl_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_class_structure| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"class_structure|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_pattern|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcstr_self|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcstr_fields|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_class_field| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"class_field|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_class_field_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcf_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcf_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pcf_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_module_type| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"module_type|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_module_type_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmty_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmty_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmty_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_signature_item| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"signature_item|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_signature_item_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:psig_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:psig_loc|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_module_declaration| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"module_declaration|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmd_name|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_module_type|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmd_type|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmd_attributes|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmd_loc|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_module_substitution| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"module_substitution|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pms_name|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_longident_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pms_manifest|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pms_attributes|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pms_loc|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_module_type_declaration| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"module_type_declaration|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmtd_name|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_option|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmtd_type|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmtd_attributes|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmtd_loc|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_open_infos| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_var_name|process_list1process_arg_labelNoLabel|EXPR:IDENTident:popen_expr|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_override_flag|process_list1process_arg_labelNoLabel|EXPR:IDENTident:popen_override|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:popen_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:popen_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_include_infos| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_var_name|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pincl_mod|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pincl_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pincl_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_module_expr| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"module_expr|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_module_expr_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmod_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmod_loc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmod_attributes|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_structure_item| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"structure_item|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_structure_item_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pstr_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pstr_loc|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_value_binding| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"value_binding|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_pattern|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pvb_pat|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pvb_expr|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pvb_attributes|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pvb_loc|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_module_binding| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"module_binding|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmb_name|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_module_expr|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmb_expr|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_attributes|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmb_attributes|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pmb_loc|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_toplevel_directive| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"toplevel_directive|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pdir_name|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_option|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pdir_arg|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pdir_loc|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_directive_argument| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"directive_argument|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_directive_argument_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pdira_desc|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_location|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pdira_loc|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
DEBUG2Erec: let process_type_decl_core_type_list (x:core_type_list):string = match x with {emit_type_decl_kindABSTRACT} ->SKIP 
DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'arg_label' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'class_structure' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'constant' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'extension' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'extension_constructor' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'label' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'letop' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'longident_loc' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'module_expr' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'open_declaration' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'rec_flag' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type_desc' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'label_declaration' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type' my_process_core_type_list:DEBUG:Ptyp_constr1 'option' ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'label_declaration' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'expression' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'pattern' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'expression_desc' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'expression' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'cases' my_process_core_type_list:DEBUG:Ptyp_constr1 'case' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'expression' my_process_core_type_list:DEBUG:Ptyp_constr1 'option' ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'expression' my_process_core_type_list:DEBUG:Ptyp_constr1 'arg_label' my_process_core_type_list:DEBUG:Ptyp_constr1 'list' ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"arg_label|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'value_binding' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'value_binding' my_process_core_type_list:DEBUG:Ptyp_constr1 'list' ptyp_desc:Ptyp_constr:"value_binding|"->my_process_core_type_list:,my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'longident' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'longident_loc' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'longident_loc' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type_desc' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'int' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'int' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'int' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'int' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'int' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'constructor_arguments' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'int' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'int' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'int' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'core_type_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'constructor_declaration' my_process_core_type_list:DEBUG:Ptyp_constr1 'list' ptyp_desc:Ptyp_constr:"constructor_declaration|"->my_process_core_type_list:,my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:
DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'type_declaration_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string_list' my_process_core_type_list:DEBUG:Ptyp_constr1 'structure_item_desc' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'structure_item' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:TOPstructure_item_desc:printdescmodule_open
TOPstructure_item_desc:printdescPstr_type:print_type_decl:"core_type_list" = DEBUG:Ptype_abstract[process_type_decl_list]
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_apply| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpatterna6|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("apply:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:a|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("|")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:c|process_list1process_list1|process_list1process_list1|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_types| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("TOP1")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_array| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("ARRAY")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_extension1| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("EXT")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_function| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("FUNCTION")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_ident| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("IDENT")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_lazy| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("LAZY")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_letop1| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("LETOP")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_new| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("NEW")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_object| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("OBJECT")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_override| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("OVERRIDE")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_pack| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("PACK")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_tuple| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("TUPLE")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_constant1| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("CONSTANT")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_assert| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("ASSERT")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_option| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:a|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_option_TODO")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:a|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_direction_flag| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:alist0|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("FIXME4")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_arg_label| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:a|ptyp_desc:Ptyp_constr:"arg_label|"->my_process_core_type_list:|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_arg_label")|process_list1process_arg_labelNoLabel|EXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("NoLabel"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("label:")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:a|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("label_optional:")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:a|process_list1process_list1)|(process_casesprocess_cases))))|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_class_structure| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:aclass_structure0|ptyp_desc:Ptyp_constr:"class_structure|"->my_process_core_type_list:|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("FIXME7")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_constant| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:a|ptyp_desc:Ptyp_constr:"constant|"->my_process_core_type_list:|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_constant")|process_list1process_arg_labelNoLabel|EXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("int")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:a|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("char")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:String.make|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantint1|process_list1process_arg_labelNoLabel|EXPR:IDENTident:char|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("Pconst_string("")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:string|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("")")|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("float")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:string|process_list1process_list1)|(process_casesprocess_cases)))))|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_extension| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:aextension0|ptyp_desc:Ptyp_constr:"extension|"->my_process_core_type_list:|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("FIXME9")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_extension_constructor| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:aextension_constructor0|ptyp_desc:Ptyp_constr:"extension_constructor|"->my_process_core_type_list:|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("FIXME10")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_label| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:alabel0|ptyp_desc:Ptyp_constr:"label|"->my_process_core_type_list:|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_label")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:alabel0|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_letop| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:aletop0|ptyp_desc:Ptyp_constr:"letop|"->my_process_core_type_list:|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("FIXME12")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_list| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:a|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_list")|process_list1process_arg_labelNoLabel|EXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("process_list"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:a|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(",")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:t|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases)))|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_loc| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:aloc0|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("FIXME14")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_id1| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:a|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:IDENTident:string)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_id1|process_list1process_arg_labelNoLabel|EXPR:IDENTident:longident|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(".")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:string|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_id1|process_list1process_arg_labelNoLabel|EXPR:IDENTident:longident|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(".")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_id1|process_list1process_arg_labelNoLabel|EXPR:IDENTident:longident2|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_longident_loc| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:a|ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("ident:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_id1|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:a|ident:txt|process_list1process_list1|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_module_expr| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:amodule_expr0|ptyp_desc:Ptyp_constr:"module_expr|"->my_process_core_type_list:|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("FIXME16")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_open_declaration| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:aopen_declaration0|ptyp_desc:Ptyp_constr:"open_declaration|"->my_process_core_type_list:|EXPR:process_constraintEXPR:CONSTANTprocess_constantPconst_string("FIXME17")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_rec_flag| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"rec_flag|"->my_process_core_type_list:|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_rec_flag")|process_list1process_arg_labelNoLabel|EXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("plain"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("rec"))|(process_casesprocess_cases)))|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_list1| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:a|ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"arg_label|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_list1")|process_list1process_arg_labelNoLabel|EXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("process_list1"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_arg_label|process_list1process_arg_labelNoLabel|EXPR:IDENTident:l|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("|")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:e|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("|")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_list1|process_list1process_arg_labelNoLabel|EXPR:IDENTident:t|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases)))|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNpattern_Ppat_var:process_expression_option| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:a|ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_expression_option_TODO")|process_list1process_arg_labelNoLabel|EXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("nope"))|(process_casesprocess_cases)))|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNpattern_Ppat_var:process_string_loc_expression_list| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:CONSTANTprocess_constantPconst_string("process_string_loc_expression_list");;pattern:PATTERNpattern_Ppat_var:process_expression_list| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:a|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_list")|process_list1process_arg_labelNoLabel|EXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("process_expression_list"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:a|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("|")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:t|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases)))|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNpattern_Ppat_var:process_value_binding| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_value_binding:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_pattern|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:x|ident:pvb_pat|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("|")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:x|ident:pvb_expr|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1;;pattern:PATTERNpattern_Ppat_var:process_case| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:a|ptyp_desc:Ptyp_constr:"case|"->my_process_core_type_list:|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("case:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_pattern|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:a|ident:pc_lhs|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("|")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression_option|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:a|ident:pc_guard|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("|")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:a|ident:pc_rhs|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1;;pattern:PATTERNpattern_Ppat_var:process_cases| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:a|ptyp_desc:Ptyp_constr:"cases|"->my_process_core_type_list:|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_cases")|process_list1process_arg_labelNoLabel|EXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("process_cases"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_case|process_list1process_arg_labelNoLabel|EXPR:IDENTident:a|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("|")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_cases|process_list1process_arg_labelNoLabel|EXPR:IDENTident:t|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases)))|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNpattern_Ppat_var:process_value_binding_list| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("value_binding_list")|process_list1process_arg_labelNoLabel|EXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("process_expression_list"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_value_binding|process_list1process_arg_labelNoLabel|EXPR:IDENTident:a|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("|")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_value_binding_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:t|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases)))|process_list1process_list1;;pattern:PATTERNpattern_Ppat_var:print_value_binding_expr| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("print_value_binding_expr:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("|")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression_desc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pexp_desc|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNpattern_Ppat_var:process_expression_desc| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"expression_desc|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_apply|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_list1|process_list1process_arg_labelNoLabel|EXPR:IDENTident:listA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_array|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:listA0|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_assert|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_coerce|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_core_type_option|process_list1process_arg_labelNoLabel|EXPR:IDENTident:optionA1|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_core_type|process_list1process_arg_labelNoLabel|EXPR:IDENTident:core_typeA2|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_constant1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_constant|process_list1process_arg_labelNoLabel|EXPR:IDENTident:constantA0|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_constraint|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_core_type|process_list1process_arg_labelNoLabel|EXPR:IDENTident:core_typeA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_construct|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_longident_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:longident_locA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression_option|process_list1process_arg_labelNoLabel|EXPR:IDENTident:optionA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_extension1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_extension|process_list1process_arg_labelNoLabel|EXPR:IDENTident:extensionA0|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_field|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_longident_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:longident_locA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_for|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_pattern|process_list1process_arg_labelNoLabel|EXPR:IDENTident:patternA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA1|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA2|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_direction_flag|process_list1process_arg_labelNoLabel|EXPR:IDENTident:direction_flagA3|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA4|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_fun|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_arg_label|process_list1process_arg_labelNoLabel|EXPR:IDENTident:arg_labelA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression_option|process_list1process_arg_labelNoLabel|EXPR:IDENTident:optionA1|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_pattern|process_list1process_arg_labelNoLabel|EXPR:IDENTident:patternA2|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA3|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_function|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_cases|process_list1process_arg_labelNoLabel|EXPR:IDENTident:casesA0|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_ident|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_longident_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:longident_locA0|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_ifthenelse|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA1|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression_option|process_list1process_arg_labelNoLabel|EXPR:IDENTident:optionA2|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_lazy|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_letexception|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_extension_constructor|process_list1process_arg_labelNoLabel|EXPR:IDENTident:extension_constructorA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_letmodule|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:locA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_module_expr|process_list1process_arg_labelNoLabel|EXPR:IDENTident:module_exprA1|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA2|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_letop1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_letop|process_list1process_arg_labelNoLabel|EXPR:IDENTident:letopA0|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_let|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_rec_flag|process_list1process_arg_labelNoLabel|EXPR:IDENTident:rec_flagA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_value_binding_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:listA1|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA2|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_match|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_cases|process_list1process_arg_labelNoLabel|EXPR:IDENTident:casesA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_new|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_longident_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:longident_locA0|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_newtype|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:locA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_object|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_class_structure|process_list1process_arg_labelNoLabel|EXPR:IDENTident:class_structureA0|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_open|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_open_declaration|process_list1process_arg_labelNoLabel|EXPR:IDENTident:open_declarationA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_override|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_string_loc_expression_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:listA0|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_pack|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_module_expr|process_list1process_arg_labelNoLabel|EXPR:IDENTident:module_exprA0|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_poly|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_core_type_option|process_list1process_arg_labelNoLabel|EXPR:IDENTident:optionA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_record|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_long_ident_expression_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:listA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression_option|process_list1process_arg_labelNoLabel|EXPR:IDENTident:optionA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_send|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:locA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_sequence|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_setfield|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_longident_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:longident_locA1|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA2|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_setinstvar|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_loc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:locA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_try|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_cases|process_list1process_arg_labelNoLabel|EXPR:IDENTident:casesA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_tuple|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:listA0|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("Unreachable"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_variant|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_label|process_list1process_arg_labelNoLabel|EXPR:IDENTident:labelA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression_option|process_list1process_arg_labelNoLabel|EXPR:IDENTident:optionA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_while|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA0|process_list1process_list1|process_listEXPR:apply:EXPR:IDENTident:process_expression|process_list1process_arg_labelNoLabel|EXPR:IDENTident:expressionA1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1)|(process_casesprocess_cases))))))))))))))))))))))))))))))))))))))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNpattern_Ppat_var:process_pattern_desc| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna1"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("pattern_Ppat_var:")|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:name|ident:txt|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna3"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna4"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna5"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna6"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna7"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna8"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna9"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna10 "))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna12"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("Ppat_constraint:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_pattern|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pattern|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("|")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_core_type|process_list1process_arg_labelNoLabel|EXPR:IDENTident:core_type|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna14"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna15"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna16"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna17"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna19"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("patterna30"))|(process_casesprocess_cases)))))))))))))))))));;pattern:PATTERNpattern_Ppat_var:process_long_ident_expression_list| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:CONSTANTprocess_constantPconst_string("process_long_ident_expression_list");;pattern:PATTERNpattern_Ppat_var:process_pattern| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:apattern0|ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("PATTERN")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_pattern_desc|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:apattern0|ident:ppat_desc|process_list1process_list1|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNpattern_Ppat_var:process_expression| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("EXPR:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_expression_desc|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:x|ident:pexp_desc|process_list1process_list1|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNPpat_constraint:PATTERNpattern_Ppat_var:process_record_kind4|ptyp_desc:poly| expr: EXPR:process_constraintEXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:s|EXPR:CONSTANTprocess_constantPconst_string("")|ptyp_desc:arrow;;pattern:PATTERNpattern_Ppat_var:process_record_kind2| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"label_declaration|"->my_process_core_type_list:|EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:s|ptyp_desc:Ptyp_constr:"string_list|"->my_process_core_type_list:|EXPR:CONSTANTprocess_constantPconst_string("");;pattern:PATTERNpattern_Ppat_var:process_record_kind3| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:s|EXPR:CONSTANTprocess_constantPconst_string("");;pattern:PATTERNpattern_Ppat_var:process_core_type| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:my_process_core_type|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNpattern_Ppat_var:process_core_type_option| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:a|ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("processcore_type_option_TODO")|process_list1process_arg_labelNoLabel|EXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_core_type|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("nope"))|(process_casesprocess_cases)))|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNpattern_Ppat_var:process_record_kind| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpatterna6|ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"label_declaration|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string_list|"->my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:pct|EXPR:apply:EXPR:IDENTident:my_process_core_type|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pld_type|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:precord_kind:")|process_listEXPR:IDENTident:pld_name|process_listEXPR:CONSTANTprocess_constantPconst_string("mutable")|process_listEXPR:IDENTident:pld_mutable|process_listEXPR:CONSTANTprocess_constantPconst_string("type")|process_listEXPR:IDENTident:pld_type|process_listprocess_expression_list|process_list1process_list1|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_record_kind:"")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:pld_name|ident:txt|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("|")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("" body:")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:pct|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNpattern_Ppat_var:my_process_core_type_desc| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"core_type_desc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string_list|"->my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna6|(process_expression_option(null_expression))|EXPR:process_matchEXPR:IDENTident:ctd|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpatterna9|EXPR:IDENTident:a|value_binding_listprocess_expression_list|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:id1|EXPR:apply:EXPR:IDENTident:process_id1|process_list1process_arg_labelNoLabel|EXPR:IDENTident:txt|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:newlist|EXPR:apply:EXPR:IDENTident:my_process_core_type_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:b|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:Printf.printf|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptyp_constr1 '%s' %s")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:id1|process_list1process_arg_labelNoLabel|EXPR:IDENTident:newlist|process_list1process_list1|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptyp_constr:")|process_listEXPR:CONSTANTprocess_constantPconst_string("id")|process_listEXPR:IDENTident:a|process_listEXPR:CONSTANTprocess_constantPconst_string("types")|process_listEXPR:IDENTident:b|process_listEXPR:CONSTANTprocess_constantPconst_string("context")|process_listEXPR:IDENTident:s|process_listEXPR:CONSTANTprocess_constantPconst_string("id1")|process_listEXPR:IDENTident:id1|process_listprocess_expression_list|process_list1process_list1|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("Ptyp_constr:"")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:id1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("|")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(""->")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:newlist|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptyp_tuple:")|process_listEXPR:IDENTident:a|process_listprocess_expression_list|process_list1process_list1|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("Ptyp_tuple")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:my_process_core_type_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:a|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptyp_any:")|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("any"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptyp_var:")|process_listEXPR:IDENTident:name|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("var-name"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptyp_arrow10:")|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("arrow"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptyp_arrow8:")|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("obj"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:myid|EXPR:apply:EXPR:IDENTident:process_id1|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:a|ident:txt|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptyp_arrow7:")|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("class"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptyp_arrow6:")|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("alias"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptyp_arrow5:")|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("variant"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptyp_arrow4:")|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("poly"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptyp_arrow3:")|process_listEXPR:IDENTident:a|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("typ_package"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptyp_extension:")|process_listEXPR:IDENTident:a|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("extension"))|(process_casesprocess_cases))))))))))))))|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNpattern_Ppat_var:process_record_kind_list| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpatterna6|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("process_record_kind_list"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_record_kind|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:h|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("/")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_record_kind_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:p|process_listEXPR:IDENTident:t|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases)))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNpattern_Ppat_var:my_process_core_type| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:td|EXPR:apply:EXPR:IDENTident:my_process_core_type_desc|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:ptyp_desc|process_listEXPR:process_constructident:[]|(process_expression_option(null_expression))|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("ptyp_desc:")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:td|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;pattern:PATTERNpattern_Ppat_var:my_process_core_type_list| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"core_type_list|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string_list|"->my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna6|(process_expression_option(null_expression))|EXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("my_process_core_type_list:"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:my_process_core_type|process_list1process_arg_labelNoLabel|EXPR:IDENTident:h|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(",")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:my_process_core_type_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:t|process_listEXPR:IDENTident:b|process_listprocess_expression_list|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))))|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:imp_core_type_list| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"core_type_list|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string_list|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"int|"->my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna6|(process_expression_option(null_expression))|EXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string(""))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:tt|EXPR:apply:EXPR:IDENTident:imp_core_type_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:t|process_listEXPR:IDENTident:b|process_listEXPR:apply:EXPR:IDENTident:+|process_list1process_arg_labelNoLabel|EXPR:IDENTident:n|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantint1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:one|EXPR:apply:EXPR:IDENTident:imp_core_type|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:h|process_listEXPR:IDENTident:b|process_listEXPR:IDENTident:n|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:process_ifthenelseEXPR:apply:EXPR:IDENTident:!=|process_list1process_arg_labelNoLabel|EXPR:IDENTident:tt|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("")|process_list1process_list1EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:one|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(",")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:tt|process_list1process_list1|process_list1process_list1(process_expression_optionEXPR:IDENTident:one))|(process_casesprocess_cases))))|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:emit_constructor_arguments| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:a1|ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"constructor_arguments|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string_list|"->my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpatterna6|EXPR:IDENTident:a1|value_binding_listprocess_expression_list|EXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("| ")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:name|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(" (")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:emit_core_type_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:a|process_listEXPR:IDENTident:s|process_listEXPR:CONSTANTprocess_constantint0|process_listprocess_expression_list|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(") -> ")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("(")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_types_")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:parent|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("__")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:name|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("(")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:imp_core_type_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:a|process_listEXPR:IDENTident:s|process_listEXPR:CONSTANTprocess_constantint0|process_listprocess_expression_list|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("))")|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpattern_Ppat_var:other|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("other"))|(process_casesprocess_cases)))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:decl_imp_core_type| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:a|ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string_list|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"int|"->my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpatterna6|EXPR:IDENTident:a|value_binding_listprocess_expression_list|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:name|EXPR:apply:EXPR:IDENTident:emit_core_type|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:atype|process_listEXPR:IDENTident:s|process_listEXPR:IDENTident:n|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:h1|EXPR:apply:EXPR:IDENTident:emit_core_type2|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:atype|process_listEXPR:IDENTident:s|process_listEXPR:IDENTident:n|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:print_endline|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG2A:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("let process_")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:h1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(" x : ")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:h1|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("= x")|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("a")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:name|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:decl_imp_core_type_list| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpatterna6|EXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string(""))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:h1|EXPR:apply:EXPR:IDENTident:decl_imp_core_type|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:parent|process_listEXPR:IDENTident:name|process_listEXPR:IDENTident:h|process_listEXPR:IDENTident:b|process_listEXPR:IDENTident:n|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:tt|EXPR:apply:EXPR:IDENTident:decl_imp_core_type_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:parent|process_listEXPR:IDENTident:name|process_listEXPR:IDENTident:t|process_listEXPR:IDENTident:b|process_listEXPR:apply:EXPR:IDENTident:+|process_list1process_arg_labelNoLabel|EXPR:IDENTident:n|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantint1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:process_ifthenelseEXPR:apply:EXPR:IDENTident:!=|process_list1process_arg_labelNoLabel|EXPR:IDENTident:tt|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("")|process_list1process_list1EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:h1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(",")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:tt|process_list1process_list1|process_list1process_list1(process_expression_optionEXPR:IDENTident:h1))|(process_casesprocess_cases)));;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:decl_imp_core_type_list2| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpatterna6|ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type_list|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string_list|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"int|"->my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string(""))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:h1|EXPR:apply:EXPR:IDENTident:emit_core_type2|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:h|process_listEXPR:IDENTident:b|process_listEXPR:IDENTident:n|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:tt|EXPR:apply:EXPR:IDENTident:decl_imp_core_type_list2|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:parent|process_listEXPR:IDENTident:name|process_listEXPR:IDENTident:t|process_listEXPR:IDENTident:b|process_listEXPR:apply:EXPR:IDENTident:+|process_list1process_arg_labelNoLabel|EXPR:IDENTident:n|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantint1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:process_ifthenelseEXPR:apply:EXPR:IDENTident:!=|process_list1process_arg_labelNoLabel|EXPR:IDENTident:tt|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("")|process_list1process_list1EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:h1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("*")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:tt|process_list1process_list1|process_list1process_list1(process_expression_optionEXPR:IDENTident:h1))|(process_casesprocess_cases)))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:decl_imp_core_type_list_hats| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpatterna6|ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type_list|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string_list|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"int|"->my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string(""))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:h1|EXPR:apply:EXPR:IDENTident:decl_imp_core_type|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:parent|process_listEXPR:IDENTident:name|process_listEXPR:IDENTident:h|process_listEXPR:IDENTident:b|process_listEXPR:IDENTident:n|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:quoted|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(""")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:h1|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(""")|process_list1process_list1|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:tt|EXPR:apply:EXPR:IDENTident:decl_imp_core_type_list_hats|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:parent|process_listEXPR:IDENTident:name|process_listEXPR:IDENTident:t|process_listEXPR:IDENTident:b|process_listEXPR:apply:EXPR:IDENTident:+|process_list1process_arg_labelNoLabel|EXPR:IDENTident:n|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantint1|process_list1process_list1|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:process_ifthenelseEXPR:apply:EXPR:IDENTident:!=|process_list1process_arg_labelNoLabel|EXPR:IDENTident:tt|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("")|process_list1process_list1EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:quoted|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("^")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:tt|process_list1process_list1|process_list1process_list1(process_expression_optionEXPR:IDENTident:quoted))|(process_casesprocess_cases)))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:decl_emit_constructor_arguments| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpatterna6|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("let ")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("process_types_")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:parent|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("__")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:name|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("((")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:decl_imp_core_type_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:parent|process_listEXPR:IDENTident:name|process_listEXPR:IDENTident:a|process_listEXPR:IDENTident:s|process_listEXPR:CONSTANTprocess_constantint0|process_listprocess_expression_list|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("):")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("(")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:decl_imp_core_type_list2|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:parent|process_listEXPR:IDENTident:name|process_listEXPR:IDENTident:a|process_listEXPR:IDENTident:s|process_listEXPR:CONSTANTprocess_constantint0|process_listprocess_expression_list|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(")):string")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(" = "process_types_")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:parent|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("__")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:name|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(""^")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:decl_imp_core_type_list_hats|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:parent|process_listEXPR:IDENTident:name|process_listEXPR:IDENTident:a|process_listEXPR:IDENTident:s|process_listEXPR:CONSTANTprocess_constantint0|process_listprocess_expression_list|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpattern_Ppat_var:other|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("other"))|(process_casesprocess_cases)))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_label_declaration| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("Label_decl:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:process_fieldEXPR:IDENTident:x|ident:pld_name|ident:txt|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_core_type|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:x|ident:pld_type|process_list1process_list1|process_list1process_list1|process_list1process_list1;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:print_constructor_arguments| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:a|EXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna6|(process_expression_option(null_expression))|EXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pcstr_tuple:")|process_listEXPR:IDENTident:a|process_listprocess_expression_list|process_list1process_list1|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("Pcstr_tuple:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:my_process_core_type_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:a|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pcstr_record:")|process_listEXPR:IDENTident:a|process_listprocess_expression_list|process_list1process_list1|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("Pcstr_record")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_label_declaration_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:a|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))))|(process_casesprocess_cases));;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_variant_constructor_declaration_list| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:a|ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"constructor_declaration|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string_list|"->my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna6|(process_expression_option(null_expression))|EXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("VARIANT(")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:p|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("):")|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_matchEXPR:IDENTident:h|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:print_endline|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG2C: let process_")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:IDENTident:p|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("__")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:pcd_name|ident:txt|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(" x :string =")|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("match x with ")|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:newtext|EXPR:apply:EXPR:IDENTident:emit_constructor_arguments|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:p|process_listEXPR:process_fieldEXPR:IDENTident:pcd_name|ident:txt|process_listEXPR:IDENTident:pcd_args|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:newtext2|EXPR:apply:EXPR:IDENTident:decl_emit_constructor_arguments|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:p|process_listEXPR:process_fieldEXPR:IDENTident:pcd_name|ident:txt|process_listEXPR:IDENTident:pcd_args|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:print_endline|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG2B:")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:newtext2|process_list1process_list1|process_list1process_list1|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:print_endline|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG2C:")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:newtext|process_list1process_list1|process_list1process_list1|EXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:ret|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("constructor:"")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:process_fieldEXPR:IDENTident:pcd_name|ident:txt|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string(""")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("{")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:print_constructor_arguments|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:pcd_args|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("}")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("	|")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_type_variant_constructor_declaration_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:p|process_listEXPR:IDENTident:t|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:Printf.printf|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG:constructor_declaration_new: %s
")|process_list1process_arg_labelNoLabel|EXPR:IDENTident:ret|process_list1process_list1|EXPR:IDENTident:ret)|(process_casesprocess_cases)))|(process_casesprocess_cases))))|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_kind| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:a|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna6|(process_expression_option(null_expression))|EXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptype_abstract:")|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptype_abstract"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("type variant:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_type_variant_constructor_declaration_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:p|process_listEXPR:IDENTident:a|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:process_record_kind_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:p|process_listEXPR:IDENTident:a|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("DEBUG:Ptype_abstract:")|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("Ptype_abstract"))|(process_casesprocess_cases))))))|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:process_type_decl_list| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:a|ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"type_declaration_list|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string_list|"->my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna6|(process_expression_option(null_expression))|EXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("process_type_decl_list"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:print_type_decl|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:h|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("[")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_type_decl_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:t|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("]")|process_list1process_list1|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))))|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:printdesc| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:a|ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"structure_item_desc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string_list|"->my_process_core_type_list:,my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:a|(process_cases(casePATTERNpatterna6|(process_expression_option(null_expression))|EXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("Pstr_value:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:print_value_binding_list|process_list1process_arg_labelNoLabel|EXPR:IDENTident:value_binding_list|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("Pstr_type:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:process_type_decl_list|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:type_declaration_list|process_listEXPR:IDENTident:s|process_listprocess_expression_list|process_list1process_list1|process_list1process_list1)|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:CONSTANTprocess_constantPconst_string("module_binding"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pstr_open")|process_listEXPR:IDENTident:open_description|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("module_open"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pstr_eval:")|process_listEXPR:IDENTident:expression|process_listEXPR:IDENTident:attributes|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("Pstr_eval"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pstr_primitive:")|process_listEXPR:IDENTident:value_description|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("primitive"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pstr_typext:")|process_listEXPR:IDENTident:type_extension|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("typeext"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pstr_exception:")|process_listEXPR:IDENTident:extension_constructor|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("exception"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pstr_recmodule:")|process_listEXPR:IDENTident:module_binding_list|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("recmodule"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pstr_modtype:")|process_listEXPR:IDENTident:module_type_declaration|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("modtype"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pstr_class:")|process_listEXPR:IDENTident:class_declarations|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("class"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pstr_class_type:")|process_listEXPR:IDENTident:class_type_declarations|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("class_Type"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pstr_include:")|process_listEXPR:IDENTident:include_declaration|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("include"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pstr_attribute:")|process_listEXPR:IDENTident:attribute|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("attribte"))|(process_cases(casePATTERNpatterna7|(process_expression_option(null_expression))|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:Pstr_extension:")|process_listEXPR:IDENTident:extension|process_listEXPR:IDENTident:attributes|process_listprocess_expression_list|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("extension"))|(process_casesprocess_cases)))))))))))))))))|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:printone| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNPpat_constraint:PATTERNpattern_Ppat_var:x|ptyp_desc:Ptyp_constr:"structure_item|"->my_process_core_type_list:|EXPR:process_constraintEXPR:process_matchEXPR:IDENTident:x|(process_cases(casePATTERNpatterna9|(process_expression_option(null_expression))|EXPR:apply:EXPR:IDENTident:^|process_list1process_arg_labelNoLabel|EXPR:CONSTANTprocess_constantPconst_string("TOPstructure_item_desc:")|process_list1process_arg_labelNoLabel|EXPR:apply:EXPR:IDENTident:printdesc|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:IDENTident:pstr_desc|process_listEXPR:process_constructident:[]|(process_expression_option(null_expression))|process_listprocess_expression_list|process_list1process_list1|process_list1process_list1)|(process_casesprocess_cases))|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:printone2| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:process_sequencesEXPR:apply:EXPR:IDENTident:ppddump|process_list1process_arg_labelNoLabel|EXPR:TUPLEprocess_listEXPR:CONSTANTprocess_constantPconst_string("DEBUG:SECOND::")|process_listEXPR:IDENTident:x|process_listprocess_expression_list|process_list1process_list1|EXPR:apply:EXPR:IDENTident:printone|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:proc1| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:x|EXPR:process_constraintEXPR:apply:EXPR:IDENTident:printone2|process_list1process_arg_labelNoLabel|EXPR:IDENTident:x|process_list1process_list1|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
TOPstructure_item_desc:printdescPstr_value:pattern:PATTERNpattern_Ppat_var:debug| expr: EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:proc|EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:lst|EXPR:process_constraintEXPR:letprocess_rec_flagplain|value_binding_listprocess_value_binding:PATTERNpattern_Ppat_var:result|EXPR:apply:EXPR:IDENTident:List.map|process_list1process_arg_labelNoLabel|EXPR:IDENTident:proc|process_list1process_arg_labelNoLabel|EXPR:IDENTident:lst|process_list1process_list1|value_binding_listprocess_expression_list|EXPR:process_sequencesEXPR:apply:EXPR:IDENTident:List.iter|process_list1process_arg_labelNoLabel|EXPR:process_fun:process_arg_labelNoLabel|(process_expression_option(null_expression))|PATTERNpattern_Ppat_var:i|EXPR:apply:EXPR:IDENTident:print_endline|process_list1process_arg_labelNoLabel|EXPR:IDENTident:i|process_list1process_list1|process_list1process_arg_labelNoLabel|EXPR:IDENTident:result|process_list1process_list1|EXPR:CONSTANTprocess_constantPconst_string("TODO")|ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:;;print_value_binding_list;;
DEBUG2EC:| Pdir_string (string) -> (process_types_directive_argument_desc__Pdir_string(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Pdir_string"{| Pdir_string (string) -> (process_types_directive_argument_desc__Pdir_string(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Ptop_def (structure) -> (process_types_toplevel_phrase__Ptop_def(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Ptop_def"{| Ptop_def (structure) -> (process_types_toplevel_phrase__Ptop_def(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Pstr_eval (expression,attributes) -> (process_types_structure_item_desc__Pstr_eval(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Pstr_eval"{| Pstr_eval (expression,attributes) -> (process_types_structure_item_desc__Pstr_eval(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Pmod_ident (longident_loc) -> (process_types_module_expr_desc__Pmod_ident(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Pmod_ident"{| Pmod_ident (longident_loc) -> (process_types_module_expr_desc__Pmod_ident(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Pwith_type (longident_loc,type_declaration) -> (process_types_with_constraint__Pwith_type(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Pwith_type"{| Pwith_type (longident_loc,type_declaration) -> (process_types_with_constraint__Pwith_type(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Psig_value (value_description) -> (process_types_signature_item_desc__Psig_value(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Psig_value"{| Psig_value (value_description) -> (process_types_signature_item_desc__Psig_value(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Unit () -> (process_types_functor_parameter__Unit(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Unit"{| Unit () -> (process_types_functor_parameter__Unit(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Pmty_ident (longident_loc) -> (process_types_module_type_desc__Pmty_ident(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Pmty_ident"{| Pmty_ident (longident_loc) -> (process_types_module_type_desc__Pmty_ident(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Cfk_virtual (core_type) -> (process_types_class_field_kind__Cfk_virtual(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Cfk_virtual"{| Cfk_virtual (core_type) -> (process_types_class_field_kind__Cfk_virtual(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Pcf_inherit (override_flag,class_expr,option) -> (process_types_class_field_desc__Pcf_inherit(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Pcf_inherit"{| Pcf_inherit (override_flag,class_expr,option) -> (process_types_class_field_desc__Pcf_inherit(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Pcl_constr (longident_loc,list) -> (process_types_class_expr_desc__Pcl_constr(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Pcl_constr"{| Pcl_constr (longident_loc,list) -> (process_types_class_expr_desc__Pcl_constr(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Pctf_inherit (class_type) -> (process_types_class_type_field_desc__Pctf_inherit(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Pctf_inherit"{| Pctf_inherit (class_type) -> (process_types_class_type_field_desc__Pctf_inherit(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Pcty_constr (longident_loc,list) -> (process_types_class_type_desc__Pcty_constr(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Pcty_constr"{| Pcty_constr (longident_loc,list) -> (process_types_class_type_desc__Pcty_constr(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Pext_decl (list,constructor_arguments,option) -> (process_types_extension_constructor_kind__Pext_decl(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Pext_decl"{| Pext_decl (list,constructor_arguments,option) -> (process_types_extension_constructor_kind__Pext_decl(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Pcstr_tuple (list) -> (process_types_constructor_arguments__Pcstr_tuple(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Pcstr_tuple"{| Pcstr_tuple (list) -> (process_types_constructor_arguments__Pcstr_tuple(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Ptype_abstract () -> (process_types_type_kind__Ptype_abstract(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Ptype_abstract"{| Ptype_abstract () -> (process_types_type_kind__Ptype_abstract(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Pexp_ident (longident_loc) -> (process_types_expression_desc__Pexp_ident(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Pexp_ident"{| Pexp_ident (longident_loc) -> (process_types_expression_desc__Pexp_ident(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Ppat_any () -> (process_types_pattern_desc__Ppat_any(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Ppat_any"{| Ppat_any () -> (process_types_pattern_desc__Ppat_any(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Otag (loc,core_type) -> (process_types_object_field_desc__Otag(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Otag"{| Otag (loc,core_type) -> (process_types_object_field_desc__Otag(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Rtag (loc,bool,list) -> (process_types_row_field_desc__Rtag(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Rtag"{| Rtag (loc,bool,list) -> (process_types_row_field_desc__Rtag(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC: let process_core_type_desc__Ptyp_any x :string =match x with 
DEBUG2EC:| Ptyp_any () -> (process_types_core_type_desc__Ptyp_any(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Ptyp_any"{| Ptyp_any () -> (process_types_core_type_desc__Ptyp_any(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| PStr (structure) -> (process_types_payload__PStr(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"PStr"{| PStr (structure) -> (process_types_payload__PStr(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Pconst_integer (string,option) -> (process_types_constant__Pconst_integer(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Pconst_integer"{| Pconst_integer (string,option) -> (process_types_constant__Pconst_integer(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Injective () -> (process_types_injectivity__Injective(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Injective"{| Injective () -> (process_types_injectivity__Injective(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Covariant () -> (process_types_variance__Covariant(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Covariant"{| Covariant () -> (process_types_variance__Covariant(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Nolabel () -> (process_types_arg_label__Nolabel(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Nolabel"{| Nolabel () -> (process_types_arg_label__Nolabel(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Closed () -> (process_types_closed_flag__Closed(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Closed"{| Closed () -> (process_types_closed_flag__Closed(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Override () -> (process_types_override_flag__Override(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Override"{| Override () -> (process_types_override_flag__Override(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Virtual () -> (process_types_virtual_flag__Virtual(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Virtual"{| Virtual () -> (process_types_virtual_flag__Virtual(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Immutable () -> (process_types_mutable_flag__Immutable(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Immutable"{| Immutable () -> (process_types_mutable_flag__Immutable(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Private () -> (process_types_private_flag__Private(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Private"{| Private () -> (process_types_private_flag__Private(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Upto () -> (process_types_direction_flag__Upto(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Upto"{| Upto () -> (process_types_direction_flag__Upto(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Nonrecursive () -> (process_types_rec_flag__Nonrecursive(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Nonrecursive"{| Nonrecursive () -> (process_types_rec_flag__Nonrecursive(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2EC:| Lident (string) -> (process_types_longident__Lident(imp_core_type_list (a,s,0)))
DEBUG2E:constructor_declaration_new: constructor:"Lident"{| Lident (string) -> (process_types_longident__Lident(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)
DEBUG2Erec: let process_type_decl_longident (x:longident):string = match x with {emit_type_decl_kindVARIANT2constructor:"Lident"{| Lident (string) -> (process_types_longident__Lident(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_rec_flag (x:rec_flag):string = match x with {emit_type_decl_kindVARIANT2constructor:"Nonrecursive"{| Nonrecursive () -> (process_types_rec_flag__Nonrecursive(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_direction_flag (x:direction_flag):string = match x with {emit_type_decl_kindVARIANT2constructor:"Upto"{| Upto () -> (process_types_direction_flag__Upto(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_private_flag (x:private_flag):string = match x with {emit_type_decl_kindVARIANT2constructor:"Private"{| Private () -> (process_types_private_flag__Private(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_mutable_flag (x:mutable_flag):string = match x with {emit_type_decl_kindVARIANT2constructor:"Immutable"{| Immutable () -> (process_types_mutable_flag__Immutable(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_virtual_flag (x:virtual_flag):string = match x with {emit_type_decl_kindVARIANT2constructor:"Virtual"{| Virtual () -> (process_types_virtual_flag__Virtual(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_override_flag (x:override_flag):string = match x with {emit_type_decl_kindVARIANT2constructor:"Override"{| Override () -> (process_types_override_flag__Override(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_closed_flag (x:closed_flag):string = match x with {emit_type_decl_kindVARIANT2constructor:"Closed"{| Closed () -> (process_types_closed_flag__Closed(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_arg_label (x:arg_label):string = match x with {emit_type_decl_kindVARIANT2constructor:"Nolabel"{| Nolabel () -> (process_types_arg_label__Nolabel(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_variance (x:variance):string = match x with {emit_type_decl_kindVARIANT2constructor:"Covariant"{| Covariant () -> (process_types_variance__Covariant(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_injectivity (x:injectivity):string = match x with {emit_type_decl_kindVARIANT2constructor:"Injective"{| Injective () -> (process_types_injectivity__Injective(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_constant (x:constant):string = match x with {emit_type_decl_kindVARIANT2constructor:"Pconst_integer"{| Pconst_integer (string,option) -> (process_types_constant__Pconst_integer(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_payload (x:payload):string = match x with {emit_type_decl_kindVARIANT2constructor:"PStr"{| PStr (structure) -> (process_types_payload__PStr(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_core_type (x:core_type):string = match x with {emit_type_decl_kindptyp_desc(* core_type_desc*);ptyp_loc(* location*);ptyp_loc_stack(* location_stack*);ptyp_attributes(* attributes*)} ->(process_type_decl_core_type_desc ptyp_desc)^(process_type_decl_location ptyp_loc)^(process_type_decl_location_stack ptyp_loc_stack)^(process_type_decl_attributes ptyp_attributes) emit_type_decl
DEBUG2Erec: let process_type_decl_core_type_desc (x:core_type_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Ptyp_any"{| Ptyp_any () -> (process_types_core_type_desc__Ptyp_any(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_row_field_desc (x:row_field_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Rtag"{| Rtag (loc,bool,list) -> (process_types_row_field_desc__Rtag(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_object_field_desc (x:object_field_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Otag"{| Otag (loc,core_type) -> (process_types_object_field_desc__Otag(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_pattern_desc (x:pattern_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Ppat_any"{| Ppat_any () -> (process_types_pattern_desc__Ppat_any(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_expression_desc (x:expression_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Pexp_ident"{| Pexp_ident (longident_loc) -> (process_types_expression_desc__Pexp_ident(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_value_description (x:value_description):string = match x with {emit_type_decl_kindpval_name(* loc*);pval_type(* core_type*);pval_prim(* list*);pval_attributes(* attributes*);pval_loc(* location*)} ->(process_type_decl_loc pval_name)^(process_type_decl_core_type pval_type)^(process_type_decl_list pval_prim)^(process_type_decl_attributes pval_attributes)^(process_type_decl_location pval_loc) emit_type_decl
DEBUG2Erec: let process_type_decl_type_kind (x:type_kind):string = match x with {emit_type_decl_kindVARIANT2constructor:"Ptype_abstract"{| Ptype_abstract () -> (process_types_type_kind__Ptype_abstract(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_label_declaration (x:label_declaration):string = match x with {emit_type_decl_kindpld_name(* loc*);pld_mutable(* mutable_flag*);pld_type(* core_type*);pld_loc(* location*);pld_attributes(* attributes*)} ->(process_type_decl_loc pld_name)^(process_type_decl_mutable_flag pld_mutable)^(process_type_decl_core_type pld_type)^(process_type_decl_location pld_loc)^(process_type_decl_attributes pld_attributes) emit_type_decl
DEBUG2Erec: let process_type_decl_constructor_arguments (x:constructor_arguments):string = match x with {emit_type_decl_kindVARIANT2constructor:"Pcstr_tuple"{| Pcstr_tuple (list) -> (process_types_constructor_arguments__Pcstr_tuple(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_extension_constructor_kind (x:extension_constructor_kind):string = match x with {emit_type_decl_kindVARIANT2constructor:"Pext_decl"{| Pext_decl (list,constructor_arguments,option) -> (process_types_extension_constructor_kind__Pext_decl(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_class_type_desc (x:class_type_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Pcty_constr"{| Pcty_constr (longident_loc,list) -> (process_types_class_type_desc__Pcty_constr(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_class_signature (x:class_signature):string = match x with {emit_type_decl_kindpcsig_self(* core_type*);pcsig_fields(* list*)} ->(process_type_decl_core_type pcsig_self)^(process_type_decl_list pcsig_fields) emit_type_decl
DEBUG2Erec: let process_type_decl_class_type_field_desc (x:class_type_field_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Pctf_inherit"{| Pctf_inherit (class_type) -> (process_types_class_type_field_desc__Pctf_inherit(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_class_expr_desc (x:class_expr_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Pcl_constr"{| Pcl_constr (longident_loc,list) -> (process_types_class_expr_desc__Pcl_constr(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_class_field_desc (x:class_field_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Pcf_inherit"{| Pcf_inherit (override_flag,class_expr,option) -> (process_types_class_field_desc__Pcf_inherit(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_class_field_kind (x:class_field_kind):string = match x with {emit_type_decl_kindVARIANT2constructor:"Cfk_virtual"{| Cfk_virtual (core_type) -> (process_types_class_field_kind__Cfk_virtual(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_module_type_desc (x:module_type_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Pmty_ident"{| Pmty_ident (longident_loc) -> (process_types_module_type_desc__Pmty_ident(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_functor_parameter (x:functor_parameter):string = match x with {emit_type_decl_kindVARIANT2constructor:"Unit"{| Unit () -> (process_types_functor_parameter__Unit(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_signature_item_desc (x:signature_item_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Psig_value"{| Psig_value (value_description) -> (process_types_signature_item_desc__Psig_value(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_with_constraint (x:with_constraint):string = match x with {emit_type_decl_kindVARIANT2constructor:"Pwith_type"{| Pwith_type (longident_loc,type_declaration) -> (process_types_with_constraint__Pwith_type(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_module_expr_desc (x:module_expr_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Pmod_ident"{| Pmod_ident (longident_loc) -> (process_types_module_expr_desc__Pmod_ident(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_structure_item_desc (x:structure_item_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Pstr_eval"{| Pstr_eval (expression,attributes) -> (process_types_structure_item_desc__Pstr_eval(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_toplevel_phrase (x:toplevel_phrase):string = match x with {emit_type_decl_kindVARIANT2constructor:"Ptop_def"{| Ptop_def (structure) -> (process_types_toplevel_phrase__Ptop_def(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG2Erec: let process_type_decl_directive_argument_desc (x:directive_argument_desc):string = match x with {emit_type_decl_kindVARIANT2constructor:"Pdir_string"{| Pdir_string (string) -> (process_types_directive_argument_desc__Pdir_string(imp_core_type_list (a,s,0)))}	|process_type_variant_constructor_declaration_list(p,t,s)} ->SKIP emit_type_decl
DEBUG:Ptyp_constr1 'bool' my_process_core_type_list:DEBUG:constructor_declaration_new: constructor:"Pdir_bool"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"bool|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(directive_argument_desc):
DEBUG:Ptyp_constr1 'longident' my_process_core_type_list:DEBUG:constructor_declaration_new: constructor:"Pdir_ident"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pdir_bool"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"bool|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(directive_argument_desc):
DEBUG:Ptyp_constr1 'char' my_process_core_type_list:DEBUG:Ptyp_constr1 'option' ptyp_desc:Ptyp_constr:"char|"->my_process_core_type_list:,my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:constructor_declaration_new: constructor:"Pdir_int"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"char|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pdir_ident"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pdir_bool"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"bool|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(directive_argument_desc):
DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:constructor_declaration_new: constructor:"Pdir_string"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pdir_int"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"char|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pdir_ident"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pdir_bool"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"bool|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(directive_argument_desc):
DEBUG:Ptyp_constr1 'location' my_process_core_type_list:DEBUG:Ptyp_constr1 'directive_argument_desc' my_process_core_type_list:DEBUG:Ptyp_constr1 'location' my_process_core_type_list:DEBUG:Ptyp_constr1 'directive_argument' my_process_core_type_list:DEBUG:Ptyp_constr1 'option' ptyp_desc:Ptyp_constr:"directive_argument|"->my_process_core_type_list:,my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'loc' ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:DEBUG2C: let process_toplevel_phrase__Ptop_def x :string =match x with 
DEBUG:Ptyp_constr1 'toplevel_directive' my_process_core_type_list:DEBUG:constructor_declaration_new: constructor:"Ptop_dir"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"toplevel_directive|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(toplevel_phrase):
DEBUG:Ptyp_constr1 'structure' my_process_core_type_list:DEBUG:constructor_declaration_new: constructor:"Ptop_def"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"structure|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptop_dir"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"toplevel_directive|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(toplevel_phrase):
DEBUG:Ptyp_constr1 'location' my_process_core_type_list:DEBUG:Ptyp_constr1 'attributes' my_process_core_type_list:DEBUG:Ptyp_constr1 'module_expr' my_process_core_type_list:DEBUG:Ptyp_constr1 'string' my_process_core_type_list:DEBUG:Ptyp_constr1 'option' ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:DEBUG:Ptyp_constr1 'loc' ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:DEBUG:Ptyp_constr1 'location' my_process_core_type_list:DEBUG:Ptyp_constr1 'attributes' my_process_core_type_list:DEBUG:Ptyp_constr1 'expression' my_process_core_type_list:DEBUG:Ptyp_constr1 'pattern' my_process_core_type_list:DEBUG2C: let process_structure_item_desc__Pstr_eval x :string =match x with 
TOPstructure_item_desc:printdescPstr_type:print_type_decl:"position" = process_record_kind:"pos_fname|" body:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:/process_record_kind:"pos_lnum|" body:ptyp_desc:Ptyp_constr:"int|"->my_process_core_type_list:/process_record_kind:"pos_bol|" body:ptyp_desc:Ptyp_constr:"int|"->my_process_core_type_list:/process_record_kind:"pos_cnum|" body:ptyp_desc:Ptyp_constr:"int|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"location" = process_record_kind:"loc_start|" body:ptyp_desc:Ptyp_constr:"position|"->my_process_core_type_list:/process_record_kind:"loc_end|" body:ptyp_desc:Ptyp_constr:"position|"->my_process_core_type_list:/process_record_kind:"loc_ghost|" body:ptyp_desc:Ptyp_constr:"bool|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"location_stack" = DEBUG:Ptype_abstract[print_type_decl:"loc" = process_record_kind:"txt|" body:ptyp_desc:var-name/process_record_kind:"loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"longident" = type variant:constructor:"Lident"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ldot"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Lapply"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"longident|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(longident):[print_type_decl:"longident_loc" = DEBUG:Ptype_abstract[print_type_decl:"rec_flag" = type variant:constructor:"Nonrecursive"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Recursive"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(rec_flag):[print_type_decl:"direction_flag" = type variant:constructor:"Upto"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Downto"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(direction_flag):[print_type_decl:"private_flag" = type variant:constructor:"Private"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Public"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(private_flag):[print_type_decl:"mutable_flag" = type variant:constructor:"Immutable"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Mutable"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(mutable_flag):[print_type_decl:"virtual_flag" = type variant:constructor:"Virtual"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Concrete"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(virtual_flag):[print_type_decl:"override_flag" = type variant:constructor:"Override"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Fresh"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(override_flag):[print_type_decl:"closed_flag" = type variant:constructor:"Closed"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Open"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(closed_flag):[print_type_decl:"label" = DEBUG:Ptype_abstract[print_type_decl:"arg_label" = type variant:constructor:"Nolabel"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Labelled"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Optional"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(arg_label):[print_type_decl:"variance" = type variant:constructor:"Covariant"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Contravariant"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"NoVariance"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(variance):[print_type_decl:"injectivity" = type variant:constructor:"Injective"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"NoInjectivity"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(injectivity):[print_type_decl:"constant" = type variant:constructor:"Pconst_integer"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"char|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pconst_char"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"char|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pconst_string"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pconst_float"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"char|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(constant):[print_type_decl:"attribute" = process_record_kind:"attr_name|" body:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"attr_payload|" body:ptyp_desc:Ptyp_constr:"payload|"->my_process_core_type_list:/process_record_kind:"attr_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"extension" = DEBUG:Ptype_abstract[print_type_decl:"attributes" = DEBUG:Ptype_abstract[print_type_decl:"payload" = type variant:constructor:"PStr"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"structure|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"PSig"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"signature|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"PTyp"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"PPat"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(payload):[print_type_decl:"core_type" = process_record_kind:"ptyp_desc|" body:ptyp_desc:Ptyp_constr:"core_type_desc|"->my_process_core_type_list:/process_record_kind:"ptyp_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"ptyp_loc_stack|" body:ptyp_desc:Ptyp_constr:"location_stack|"->my_process_core_type_list:/process_record_kind:"ptyp_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"core_type_desc" = type variant:constructor:"Ptyp_any"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Ptyp_var"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptyp_arrow"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"arg_label|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptyp_tuple"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptyp_constr"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptyp_object"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"object_field|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"closed_flag|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptyp_class"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptyp_alias"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptyp_variant"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"row_field|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"closed_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"label|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptyp_poly"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptyp_package"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"package_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptyp_extension"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"extension|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(core_type_desc):[print_type_decl:"package_type" = DEBUG:Ptype_abstract[print_type_decl:"row_field" = process_record_kind:"prf_desc|" body:ptyp_desc:Ptyp_constr:"row_field_desc|"->my_process_core_type_list:/process_record_kind:"prf_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"prf_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"row_field_desc" = type variant:constructor:"Rtag"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"label|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"bool|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Rinherit"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(row_field_desc):[print_type_decl:"object_field" = process_record_kind:"pof_desc|" body:ptyp_desc:Ptyp_constr:"object_field_desc|"->my_process_core_type_list:/process_record_kind:"pof_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"pof_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"object_field_desc" = type variant:constructor:"Otag"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"label|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Oinherit"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(object_field_desc):[print_type_decl:"pattern" = process_record_kind:"ppat_desc|" body:ptyp_desc:Ptyp_constr:"pattern_desc|"->my_process_core_type_list:/process_record_kind:"ppat_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"ppat_loc_stack|" body:ptyp_desc:Ptyp_constr:"location_stack|"->my_process_core_type_list:/process_record_kind:"ppat_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"pattern_desc" = type variant:constructor:"Ppat_any"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Ppat_var"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_alias"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_constant"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"constant|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_interval"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"constant|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"constant|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_tuple"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_construct"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_variant"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"label|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_record"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"closed_flag|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_array"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_or"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_constraint"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_type"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_lazy"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_unpack"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_exception"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_extension"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"extension|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ppat_open"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(pattern_desc):[print_type_decl:"expression" = process_record_kind:"pexp_desc|" body:ptyp_desc:Ptyp_constr:"expression_desc|"->my_process_core_type_list:/process_record_kind:"pexp_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"pexp_loc_stack|" body:ptyp_desc:Ptyp_constr:"location_stack|"->my_process_core_type_list:/process_record_kind:"pexp_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"expression_desc" = type variant:constructor:"Pexp_ident"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_constant"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"constant|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_let"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"rec_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"value_binding|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_function"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"cases|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_fun"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"arg_label|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_apply"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"arg_label|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_match"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"cases|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_try"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"cases|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_tuple"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_construct"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_variant"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"label|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_record"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_field"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_setfield"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_array"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_ifthenelse"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_sequence"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_while"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_for"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"direction_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_constraint"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_coerce"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_send"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"label|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_new"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_setinstvar"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"label|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_override"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"label|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_letmodule"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"module_expr|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_letexception"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"extension_constructor|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_assert"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_lazy"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_poly"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_object"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"class_structure|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_newtype"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_pack"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"module_expr|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_open"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"open_declaration|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_letop"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"letop|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_extension"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"extension|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pexp_unreachable"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(expression_desc):[print_type_decl:"case" = process_record_kind:"pc_lhs|" body:ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:/process_record_kind:"pc_guard|" body:ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pc_rhs|" body:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"letop" = process_record_kind:"let_|" body:ptyp_desc:Ptyp_constr:"binding_op|"->my_process_core_type_list:/process_record_kind:"ands|" body:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"binding_op|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"body|" body:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"binding_op" = process_record_kind:"pbop_op|" body:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pbop_pat|" body:ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:/process_record_kind:"pbop_exp|" body:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:/process_record_kind:"pbop_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"value_description" = process_record_kind:"pval_name|" body:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pval_type|" body:ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:/process_record_kind:"pval_prim|" body:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pval_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind:"pval_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"type_declaration" = process_record_kind:"ptype_name|" body:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"ptype_params|" body:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"variance|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"injectivity|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"ptype_cstrs|" body:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"ptype_kind|" body:ptyp_desc:Ptyp_constr:"type_kind|"->my_process_core_type_list:/process_record_kind:"ptype_private|" body:ptyp_desc:Ptyp_constr:"private_flag|"->my_process_core_type_list:/process_record_kind:"ptype_manifest|" body:ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"ptype_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind:"ptype_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"type_kind" = type variant:constructor:"Ptype_abstract"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Ptype_variant"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"constructor_declaration|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptype_record"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"label_declaration|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptype_open"{Pcstr_tuple:my_process_core_type_list:}	|VARIANT(type_kind):[print_type_decl:"label_declaration" = process_record_kind:"pld_name|" body:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pld_mutable|" body:ptyp_desc:Ptyp_constr:"mutable_flag|"->my_process_core_type_list:/process_record_kind:"pld_type|" body:ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:/process_record_kind:"pld_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"pld_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"constructor_declaration" = process_record_kind:"pcd_name|" body:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pcd_vars|" body:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pcd_args|" body:ptyp_desc:Ptyp_constr:"constructor_arguments|"->my_process_core_type_list:/process_record_kind:"pcd_res|" body:ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pcd_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"pcd_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"constructor_arguments" = type variant:constructor:"Pcstr_tuple"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcstr_record"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"label_declaration|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(constructor_arguments):[print_type_decl:"type_extension" = process_record_kind:"ptyext_path|" body:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:/process_record_kind:"ptyext_params|" body:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"variance|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"injectivity|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"ptyext_constructors|" body:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"extension_constructor|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"ptyext_private|" body:ptyp_desc:Ptyp_constr:"private_flag|"->my_process_core_type_list:/process_record_kind:"ptyext_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"ptyext_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"extension_constructor" = process_record_kind:"pext_name|" body:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pext_kind|" body:ptyp_desc:Ptyp_constr:"extension_constructor_kind|"->my_process_core_type_list:/process_record_kind:"pext_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"pext_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"type_exception" = process_record_kind:"ptyexn_constructor|" body:ptyp_desc:Ptyp_constr:"extension_constructor|"->my_process_core_type_list:/process_record_kind:"ptyexn_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"ptyexn_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"extension_constructor_kind" = type variant:constructor:"Pext_decl"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"constructor_arguments|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pext_rebind"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(extension_constructor_kind):[print_type_decl:"class_type" = process_record_kind:"pcty_desc|" body:ptyp_desc:Ptyp_constr:"class_type_desc|"->my_process_core_type_list:/process_record_kind:"pcty_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"pcty_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"class_type_desc" = type variant:constructor:"Pcty_constr"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcty_signature"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"class_signature|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcty_arrow"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"arg_label|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"class_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcty_extension"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"extension|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcty_open"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"open_description|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"class_type|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(class_type_desc):[print_type_decl:"class_signature" = process_record_kind:"pcsig_self|" body:ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:/process_record_kind:"pcsig_fields|" body:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"class_type_field|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind_list[print_type_decl:"class_type_field" = process_record_kind:"pctf_desc|" body:ptyp_desc:Ptyp_constr:"class_type_field_desc|"->my_process_core_type_list:/process_record_kind:"pctf_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"pctf_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"class_type_field_desc" = type variant:constructor:"Pctf_inherit"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"class_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pctf_val"{Pcstr_tuple:ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"label|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"mutable_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"virtual_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pctf_method"{Pcstr_tuple:ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"label|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"private_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"virtual_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pctf_constraint"{Pcstr_tuple:ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pctf_attribute"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"attribute|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pctf_extension"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"extension|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(class_type_field_desc):[print_type_decl:"class_infos" = process_record_kind:"pci_virt|" body:ptyp_desc:Ptyp_constr:"virtual_flag|"->my_process_core_type_list:/process_record_kind:"pci_params|" body:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"variance|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"injectivity|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pci_name|" body:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pci_expr|" body:ptyp_desc:var-name/process_record_kind:"pci_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"pci_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"class_description" = DEBUG:Ptype_abstract[print_type_decl:"class_type_declaration" = DEBUG:Ptype_abstract[print_type_decl:"class_expr" = process_record_kind:"pcl_desc|" body:ptyp_desc:Ptyp_constr:"class_expr_desc|"->my_process_core_type_list:/process_record_kind:"pcl_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"pcl_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"class_expr_desc" = type variant:constructor:"Pcl_constr"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcl_structure"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"class_structure|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcl_fun"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"arg_label|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"class_expr|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcl_apply"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"class_expr|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"arg_label|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcl_let"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"rec_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"value_binding|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"class_expr|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcl_constraint"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"class_expr|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"class_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcl_extension"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"extension|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcl_open"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"open_description|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"class_expr|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(class_expr_desc):[print_type_decl:"class_structure" = process_record_kind:"pcstr_self|" body:ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:/process_record_kind:"pcstr_fields|" body:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"class_field|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind_list[print_type_decl:"class_field" = process_record_kind:"pcf_desc|" body:ptyp_desc:Ptyp_constr:"class_field_desc|"->my_process_core_type_list:/process_record_kind:"pcf_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"pcf_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"class_field_desc" = type variant:constructor:"Pcf_inherit"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"override_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"class_expr|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcf_val"{Pcstr_tuple:ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"label|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"mutable_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"class_field_kind|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcf_method"{Pcstr_tuple:ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"label|"->my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"private_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"class_field_kind|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcf_constraint"{Pcstr_tuple:ptyp_desc:Ptyp_tupleptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcf_initializer"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcf_attribute"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"attribute|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pcf_extension"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"extension|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(class_field_desc):[print_type_decl:"class_field_kind" = type variant:constructor:"Cfk_virtual"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"core_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Cfk_concrete"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"override_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(class_field_kind):[print_type_decl:"class_declaration" = DEBUG:Ptype_abstract[print_type_decl:"module_type" = process_record_kind:"pmty_desc|" body:ptyp_desc:Ptyp_constr:"module_type_desc|"->my_process_core_type_list:/process_record_kind:"pmty_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"pmty_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"module_type_desc" = type variant:constructor:"Pmty_ident"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pmty_signature"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"signature|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pmty_functor"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"functor_parameter|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"module_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pmty_with"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"module_type|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"with_constraint|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pmty_typeof"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"module_expr|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pmty_extension"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"extension|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pmty_alias"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(module_type_desc):[print_type_decl:"functor_parameter" = type variant:constructor:"Unit"{Pcstr_tuple:my_process_core_type_list:}	|constructor:"Named"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:,ptyp_desc:Ptyp_constr:"module_type|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(functor_parameter):[print_type_decl:"signature" = DEBUG:Ptype_abstract[print_type_decl:"signature_item" = process_record_kind:"psig_desc|" body:ptyp_desc:Ptyp_constr:"signature_item_desc|"->my_process_core_type_list:/process_record_kind:"psig_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"signature_item_desc" = type variant:constructor:"Psig_value"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"value_description|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_type"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"rec_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"type_declaration|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_typesubst"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"type_declaration|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_typext"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"type_extension|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_exception"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"type_exception|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_module"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"module_declaration|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_modsubst"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"module_substitution|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_recmodule"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"module_declaration|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_modtype"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"module_type_declaration|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_modtypesubst"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"module_type_declaration|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_open"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"open_description|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_include"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"include_description|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_class"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"class_description|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_class_type"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"class_type_declaration|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_attribute"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"attribute|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Psig_extension"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"extension|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(signature_item_desc):[print_type_decl:"module_declaration" = process_record_kind:"pmd_name|" body:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pmd_type|" body:ptyp_desc:Ptyp_constr:"module_type|"->my_process_core_type_list:/process_record_kind:"pmd_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind:"pmd_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"module_substitution" = process_record_kind:"pms_name|" body:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pms_manifest|" body:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:/process_record_kind:"pms_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind:"pms_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"module_type_declaration" = process_record_kind:"pmtd_name|" body:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pmtd_type|" body:ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"module_type|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pmtd_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind:"pmtd_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"open_infos" = process_record_kind:"popen_expr|" body:ptyp_desc:var-name/process_record_kind:"popen_override|" body:ptyp_desc:Ptyp_constr:"override_flag|"->my_process_core_type_list:/process_record_kind:"popen_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"popen_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"open_description" = DEBUG:Ptype_abstract[print_type_decl:"open_declaration" = DEBUG:Ptype_abstract[print_type_decl:"include_infos" = process_record_kind:"pincl_mod|" body:ptyp_desc:var-name/process_record_kind:"pincl_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"pincl_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"include_description" = DEBUG:Ptype_abstract[print_type_decl:"include_declaration" = DEBUG:Ptype_abstract[print_type_decl:"with_constraint" = type variant:constructor:"Pwith_type"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"type_declaration|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pwith_module"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pwith_modtype"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"module_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pwith_modtypesubst"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"module_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pwith_typesubst"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"type_declaration|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pwith_modsubst"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(with_constraint):[print_type_decl:"module_expr" = process_record_kind:"pmod_desc|" body:ptyp_desc:Ptyp_constr:"module_expr_desc|"->my_process_core_type_list:/process_record_kind:"pmod_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind:"pmod_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"module_expr_desc" = type variant:constructor:"Pmod_ident"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident_loc|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pmod_structure"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"structure|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pmod_functor"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"functor_parameter|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"module_expr|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pmod_apply"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"module_expr|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"module_expr|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pmod_constraint"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"module_expr|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"module_type|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pmod_unpack"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pmod_extension"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"extension|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(module_expr_desc):[print_type_decl:"structure" = DEBUG:Ptype_abstract[print_type_decl:"structure_item" = process_record_kind:"pstr_desc|" body:ptyp_desc:Ptyp_constr:"structure_item_desc|"->my_process_core_type_list:/process_record_kind:"pstr_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"structure_item_desc" = type variant:constructor:"Pstr_eval"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_value"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"rec_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"value_binding|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_primitive"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"value_description|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_type"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"rec_flag|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"type_declaration|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_typext"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"type_extension|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_exception"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"type_exception|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_module"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"module_binding|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_recmodule"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"module_binding|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_modtype"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"module_type_declaration|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_open"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"open_declaration|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_class"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"class_declaration|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_class_type"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"list|"->ptyp_desc:Ptyp_constr:"class_type_declaration|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_include"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"include_declaration|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_attribute"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"attribute|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pstr_extension"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"extension|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(structure_item_desc):[print_type_decl:"value_binding" = process_record_kind:"pvb_pat|" body:ptyp_desc:Ptyp_constr:"pattern|"->my_process_core_type_list:/process_record_kind:"pvb_expr|" body:ptyp_desc:Ptyp_constr:"expression|"->my_process_core_type_list:/process_record_kind:"pvb_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind:"pvb_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"module_binding" = process_record_kind:"pmb_name|" body:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pmb_expr|" body:ptyp_desc:Ptyp_constr:"module_expr|"->my_process_core_type_list:/process_record_kind:"pmb_attributes|" body:ptyp_desc:Ptyp_constr:"attributes|"->my_process_core_type_list:/process_record_kind:"pmb_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"toplevel_phrase" = type variant:constructor:"Ptop_def"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"structure|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Ptop_dir"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"toplevel_directive|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(toplevel_phrase):[print_type_decl:"toplevel_directive" = process_record_kind:"pdir_name|" body:ptyp_desc:Ptyp_constr:"loc|"->ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pdir_arg|" body:ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"directive_argument|"->my_process_core_type_list:,my_process_core_type_list:/process_record_kind:"pdir_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"directive_argument" = process_record_kind:"pdira_desc|" body:ptyp_desc:Ptyp_constr:"directive_argument_desc|"->my_process_core_type_list:/process_record_kind:"pdira_loc|" body:ptyp_desc:Ptyp_constr:"location|"->my_process_core_type_list:/process_record_kind_list[print_type_decl:"directive_argument_desc" = type variant:constructor:"Pdir_string"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pdir_int"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"string|"->my_process_core_type_list:,ptyp_desc:Ptyp_constr:"option|"->ptyp_desc:Ptyp_constr:"char|"->my_process_core_type_list:,my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pdir_ident"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"longident|"->my_process_core_type_list:,my_process_core_type_list:}	|constructor:"Pdir_bool"{Pcstr_tuple:ptyp_desc:Ptyp_constr:"bool|"->my_process_core_type_list:,my_process_core_type_list:}	|VARIANT(directive_argument_desc):[print_type_decl:"cases" = DEBUG:Ptype_abstract[process_type_decl_list]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]
276 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
276 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
Warning 27 [unused-var-strict]: unused variable core_type.
276 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
Warning 27 [unused-var-strict]: unused variable core_type2.
283 |   | Ptyp_class (a,b) (* of Longident.t loc * core_type list *)
288 |   | Ptyp_alias (a,b) (* of core_type * string loc  *)
288 |   | Ptyp_alias (a,b) (* of core_type * string loc  *)
295 |   | Ptyp_poly (a,b) (* of string loc list * core_type *)
295 |   | Ptyp_poly (a,b) (* of string loc list * core_type *)
421 |     | Ptyp_constr (a,b) (* of Longident.t loc * core_type list *)
436 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
436 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
Warning 27 [unused-var-strict]: unused variable core_type.
436 |   | Ptyp_arrow (arg_label , core_type , core_type2) ->
Warning 27 [unused-var-strict]: unused variable core_type2.
444 |   | Ptyp_class (a,b) (* of Longident.t loc * core_type list *)
449 |   | Ptyp_alias (a,b) (* of core_type * string loc  *)
449 |   | Ptyp_alias (a,b) (* of core_type * string loc  *)
456 |   | Ptyp_poly (a,b) (* of string loc list * core_type *)
456 |   | Ptyp_poly (a,b) (* of string loc list * core_type *)
629 |         pcd_res(* : core_type option *);
690 |         ptype_params (* : (core_type * (variance * injectivity)) list *);
691 |         ptype_cstrs (*: (core_type * core_type * location) list*) ;   
694 |         ptype_manifest (* : core_type option *);
