equal
deleted
inserted
replaced
9 use "thy_scan.ML"; |
9 use "thy_scan.ML"; |
10 use "thy_parse.ML"; |
10 use "thy_parse.ML"; |
11 use "thy_syn.ML"; |
11 use "thy_syn.ML"; |
12 use "thm_database.ML"; |
12 use "thm_database.ML"; |
13 use "../../Provers/simplifier.ML"; |
13 use "../../Provers/simplifier.ML"; |
14 |
14 use "symbol_input.ML"; |
15 use "thy_read.ML"; |
15 use "thy_read.ML"; |
16 |
16 |
17 structure ThySyn = ThySynFun(val user_keywords = [] and user_sections = []); |
17 structure ThySyn = ThySynFun(val user_keywords = [] and user_sections = []); |
18 structure ThmDB = ThmDBFun(); |
18 structure ThmDB = ThmDBFun(); |
19 structure ReadThy = ReadthyFun(structure ThySyn = ThySyn and ThmDB = ThmDB); |
19 structure ReadThy = ReadthyFun(structure ThySyn = ThySyn and ThmDB = ThmDB); |
20 open ThmDB ReadThy; |
20 open ThmDB ReadThy SymbolInput; |
21 |
21 |
22 |
22 |
23 fun init_thy_reader () = |
23 fun init_thy_reader () = |
24 use_string |
24 use_string |
25 ["structure ThmDB = ThmDBFun();", |
25 ["structure ThmDB = ThmDBFun();", |