30 (*val thydata = get_the ["IsacKnowledge", "Test", "Rulesets", "ac_plus_times"]; |
30 (*val thydata = get_the ["IsacKnowledge", "Test", "Rulesets", "ac_plus_times"]; |
31 (* ERROR: get_pbt not found: ["IsacKnowledge","Test","Rulesets","ac_plus_times"] *)*) |
31 (* ERROR: get_pbt not found: ["IsacKnowledge","Test","Rulesets","ac_plus_times"] *)*) |
32 "~~~~~ fun get_the, args:"; val (theID:theID) = (["IsacKnowledge", "Test", "Rulesets", "ac_plus_times"]); |
32 "~~~~~ fun get_the, args:"; val (theID:theID) = (["IsacKnowledge", "Test", "Rulesets", "ac_plus_times"]); |
33 (*get_py (Thy_Info.get_theory "Pure") theID theID (! thehier); |
33 (*get_py (Thy_Info.get_theory "Pure") theID theID (! thehier); |
34 (* ERROR: get_pbt not found: ["IsacKnowledge","Test","Rulesets","ac_plus_times"] *)*) |
34 (* ERROR: get_pbt not found: ["IsacKnowledge","Test","Rulesets","ac_plus_times"] *)*) |
35 print_depth 999; |
35 print_depth 3; (*999*) |
36 (!thehier); |
36 (!thehier); |
37 |
37 |
38 (*"~~~~~ fun get_py, args:"; val (thy, d, _, []) = ((Thy_Info.get_theory "Pure"), theID, theID, (! thehier));*) |
38 (*"~~~~~ fun get_py, args:"; val (thy, d, _, []) = ((Thy_Info.get_theory "Pure"), theID, theID, (! thehier));*) |
39 "~~~~~ fun get_py, args:"; val (thy, d, _, [_]) = ((Thy_Info.get_theory "Pure"), theID, theID, (!thehier)); |
39 "~~~~~ fun get_py, args:"; val (thy, d, _, [_]) = ((Thy_Info.get_theory "Pure"), theID, theID, (!thehier)); |
40 error ("get_pbt not found: "^(strs2str d)); |
40 error ("get_pbt not found: "^(strs2str d)); |