src/Pure/Thy/export_theory.ML
changeset 70923 98d9b78b7f47
parent 70920 1e0ad25c94c8
child 70974 3ee90f831805
equal deleted inserted replaced
70922:539dfd4c166b 70923:98d9b78b7f47
   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};