equal
deleted
inserted
replaced
50 Preds of polymorphism * type_level * type_heaviness | |
50 Preds of polymorphism * type_level * type_heaviness | |
51 Tags of polymorphism * type_level * type_heaviness |
51 Tags of polymorphism * type_level * type_heaviness |
52 |
52 |
53 type translated_formula |
53 type translated_formula |
54 |
54 |
55 val type_tag_name : string |
|
56 val bound_var_prefix : string |
55 val bound_var_prefix : string |
57 val schematic_var_prefix: string |
56 val schematic_var_prefix: string |
58 val fixed_var_prefix: string |
57 val fixed_var_prefix: string |
59 val tvar_prefix: string |
58 val tvar_prefix: string |
60 val tfree_prefix: string |
59 val tfree_prefix: string |
68 val conjecture_prefix : string |
67 val conjecture_prefix : string |
69 val helper_prefix : string |
68 val helper_prefix : string |
70 val typed_helper_suffix : string |
69 val typed_helper_suffix : string |
71 val predicator_name : string |
70 val predicator_name : string |
72 val app_op_name : string |
71 val app_op_name : string |
|
72 val type_tag_name : string |
73 val type_pred_name : string |
73 val type_pred_name : string |
74 val simple_type_prefix : string |
74 val simple_type_prefix : string |
75 val ascii_of: string -> string |
75 val ascii_of: string -> string |
76 val unascii_of: string -> string |
76 val unascii_of: string -> string |
77 val strip_prefix_and_unascii : string -> string -> string option |
77 val strip_prefix_and_unascii : string -> string -> string option |
144 |
144 |
145 val intro_info = useful_isabelle_info "intro" |
145 val intro_info = useful_isabelle_info "intro" |
146 val elim_info = useful_isabelle_info "elim" |
146 val elim_info = useful_isabelle_info "elim" |
147 val simp_info = useful_isabelle_info "simp" |
147 val simp_info = useful_isabelle_info "simp" |
148 |
148 |
149 val type_tag_name = "ti" |
|
150 |
|
151 val bound_var_prefix = "B_" |
149 val bound_var_prefix = "B_" |
152 val schematic_var_prefix = "V_" |
150 val schematic_var_prefix = "V_" |
153 val fixed_var_prefix = "v_" |
151 val fixed_var_prefix = "v_" |
154 |
152 |
155 val tvar_prefix = "T_" |
153 val tvar_prefix = "T_" |
176 val typed_helper_suffix = "_T" |
174 val typed_helper_suffix = "_T" |
177 val untyped_helper_suffix = "_U" |
175 val untyped_helper_suffix = "_U" |
178 |
176 |
179 val predicator_name = "hBOOL" |
177 val predicator_name = "hBOOL" |
180 val app_op_name = "hAPP" |
178 val app_op_name = "hAPP" |
|
179 val type_tag_name = "ti" |
181 val type_pred_name = "is" |
180 val type_pred_name = "is" |
182 val simple_type_prefix = "ty_" |
181 val simple_type_prefix = "ty_" |
183 |
182 |
184 (* Freshness almost guaranteed! *) |
183 (* Freshness almost guaranteed! *) |
185 val sledgehammer_weak_prefix = "Sledgehammer:" |
184 val sledgehammer_weak_prefix = "Sledgehammer:" |