theory Adequacy
imports ResourcedAdequacy "Denotational-Related"
begin
theorem adequacy:
assumes "[e]<lbrace>Γ} ≠ ⊥"
shows "∃ Δ v. Γ : e ⇓ Δ : v"
proof-
have "{Γ} ◃▹* N{Γ}" by (rule heaps_similar)
hence "[e]<lbrace>Γ} ◃▹ (N[e]<N>{Γ})⋅C\<infinity>" by (rule denotational_semantics_similar)
from bot_or_not_bot[OF this] assms
have "(N[e]<N>{Γ})⋅C\<infinity> ≠ ⊥" by metis
thus ?thesis by (rule resourced_adequacy)
qed
end
¤ Dauer der Verarbeitung: 0.3 Sekunden
(vorverarbeitet am 2026-11-04)
¤
*© Formatika GbR, Deutschland