changeset 12311 | ce5f9e61c037 |
parent 12123 | 739eba13e2cd |
child 12379 | c74d160ff0c5 |
12310:26407b087c8e | 12311:ce5f9e61c037 |
---|---|
38 val name = "Isar/calculation"; |
38 val name = "Isar/calculation"; |
39 type T = thm NetRules.T |
39 type T = thm NetRules.T |
40 |
40 |
41 val empty = NetRules.elim; |
41 val empty = NetRules.elim; |
42 val copy = I; |
42 val copy = I; |
43 val finish = I; |
|
44 val prep_ext = I; |
43 val prep_ext = I; |
45 val merge = NetRules.merge; |
44 val merge = NetRules.merge; |
46 val print = print_rules Display.pretty_thm_sg; |
45 val print = print_rules Display.pretty_thm_sg; |
47 end; |
46 end; |
48 |
47 |