signature INST_EX_ASSN = sig val tac : Proof.context -> term list -> int -> tactic end
structure Inst_Ex_Assn : INST_EX_ASSN = struct
fun tac ctxt [] = TRY o REPEAT_ALL_NEW (assume_tac ctxt)
| tac ctxt (t :: ts) =
(TRY o ( let val thm = Drule.infer_instantiate' ctxt [NONE, NONE, SOME (Thm.cterm_of ctxt t)] @{thm Assertions.ent_ex_postI} in
resolve_tac ctxt [thm] THEN' tac ctxt ts end))
end
Messung V0.5 in Prozent
¤ Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.0.0Bemerkung:
(vorverarbeitet am 2026-06-10)
¤
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung und die Messung sind noch experimentell.