src/HOL/Extraction/ROOT.ML

early bootstrap of generic transfer procedure

(*  Title:      HOL/Extraction/ROOT.ML

Examples for program extraction in Higher-Order Logic.
*)

if HOL_proofs < 2 then
  warning "HOL proof terms required for running extraction examples"
else
  (Proofterm.proofs := 2;
   no_document use_thys ["Efficient_Nat", "~~/src/HOL/Old_Number_Theory/Factorization"];
   use_thys ["Greatest_Common_Divisor", "Warshall", "Higman", "Pigeonhole", "Euclid"]);