(* Classical Higher-order Logic -- batteries included *) use_thy "Main"; share_common_data (); use_thy "Complex_Main"; val HOL_proofs = ! Proofterm.proofs;