src/HOL/Tools/Sledgehammer/sledgehammer_reconstruct.ML
changeset 50679 e409d9f8ec75
parent 50677 f5c217474eca
child 50705 0e943b33d907
equal deleted inserted replaced
50678:027c09d7f6ec 50679:e409d9f8ec75
   745           |> append assms
   745           |> append assms
   746           |> (if not preplay andalso isar_shrink <= 1.0 then
   746           |> (if not preplay andalso isar_shrink <= 1.0 then
   747                 rpair (false, (true, seconds 0.0))
   747                 rpair (false, (true, seconds 0.0))
   748               else
   748               else
   749                 shrink_proof debug ctxt type_enc lam_trans preplay
   749                 shrink_proof debug ctxt type_enc lam_trans preplay
   750                     preplay_timeout
   750                   preplay_timeout
   751                     (if isar_proofs then isar_shrink else 1000.0))
   751                   (if isar_proofs then isar_shrink else 1000.0))
   752        (* |>> reorder_proof_to_minimize_jumps (* ? *) *)
   752        (* |>> reorder_proof_to_minimize_jumps (* ? *) *)
   753           |>> chain_direct_proof
   753           |>> chain_direct_proof
   754           |>> kill_useless_labels_in_proof
   754           |>> kill_useless_labels_in_proof
   755           |>> relabel_proof
   755           |>> relabel_proof
   756           |>> not (null params) ? cons (Fix params)
   756           |>> not (null params) ? cons (Fix params)