equal
deleted
inserted
replaced
567 sig |
567 sig |
568 type T |
568 type T |
569 val init: theory -> theory |
569 val init: theory -> theory |
570 val print: theory -> unit |
570 val print: theory -> unit |
571 val get: theory -> T |
571 val get: theory -> T |
572 val get_sg: theory -> T (*obsolete*) |
|
573 val put: T -> theory -> theory |
572 val put: T -> theory -> theory |
574 val map: (T -> T) -> theory -> theory |
573 val map: (T -> T) -> theory -> theory |
575 end; |
574 end; |
576 |
575 |
577 functor TheoryDataFun(Data: THEORY_DATA_ARGS): THEORY_DATA = |
576 functor TheoryDataFun(Data: THEORY_DATA_ARGS): THEORY_DATA = |