1.1 --- a/src/Tools/isac/Knowledge/EqSystem.thy	Wed Apr 15 16:46:41 2020 +0200
     1.2 +++ b/src/Tools/isac/Knowledge/EqSystem.thy	Wed Apr 15 18:00:58 2020 +0200
     1.3 @@ -147,7 +147,7 @@
     1.4  	 | ord => ord)
     1.5  and hd_ord (f, g) =                                        (* ~ term.ML *)
     1.6    prod_ord (prod_ord Term_Ord.indexname_ord Term_Ord.typ_ord) int_ord (dest_hd' f, dest_hd' g)
     1.7 -and terms_ord str pr (ts, us) = list_ord (term_ord' pr (Celem.assoc_thy "Isac_Knowledge"))(ts, us);
     1.8 +and terms_ord str pr (ts, us) = list_ord (term_ord' pr (ThyC.get_theory "Isac_Knowledge"))(ts, us);
     1.9  (**)
    1.10  in
    1.11  (**)