equal
deleted
inserted
replaced
240 |
240 |
241 fun encode_axiom used prop = |
241 fun encode_axiom used prop = |
242 encode_prop (#1 (standard_prop used [] prop NONE)); |
242 encode_prop (#1 (standard_prop used [] prop NONE)); |
243 |
243 |
244 val _ = |
244 val _ = |
245 export_entities "axioms" (fn _ => fn t => SOME (encode_axiom Name.context t)) |
245 export_entities "axioms" (K (SOME o encode_axiom Name.context)) |
246 Theory.axiom_space (Theory.axioms_of thy); |
246 Theory.axiom_space (Theory.all_axioms_of thy); |
247 |
247 |
248 |
248 |
249 (* theorems and proof terms *) |
249 (* theorems and proof terms *) |
250 |
250 |
251 val export_standard_proofs = Options.default_bool @{system_option export_standard_proofs}; |
251 val export_standard_proofs = Options.default_bool @{system_option export_standard_proofs}; |