src/Pure/Isar/spec_rules.ML
changeset 41472 f6ab14e61604
parent 34948 2d5f2a9f7601
child 42360 da8817d01e7c
equal deleted inserted replaced
41471:54a58904a598 41472:f6ab14e61604
    35         class1 = class2 andalso
    35         class1 = class2 andalso
    36         eq_list (op aconv) (ts1, ts2) andalso
    36         eq_list (op aconv) (ts1, ts2) andalso
    37         eq_list Thm.eq_thm_prop (ths1, ths2))
    37         eq_list Thm.eq_thm_prop (ths1, ths2))
    38       (#1 o #2);
    38       (#1 o #2);
    39   val extend = I;
    39   val extend = I;
    40   fun merge data = Item_Net.merge data;
    40   val merge = Item_Net.merge;
    41 );
    41 );
    42 
    42 
    43 val get = Item_Net.content o Rules.get o Context.Proof;
    43 val get = Item_Net.content o Rules.get o Context.Proof;
    44 val get_global = Item_Net.content o Rules.get o Context.Theory;
    44 val get_global = Item_Net.content o Rules.get o Context.Theory;
    45 
    45