fact: Definition compiled_sound := forall i₁ v₁ i₂ v₂ w₁, v₁ ⋈ w₁ /\ P /X/ (i₁,v₁) ->> (i₂,v₂) -> exists w₂, v₂ ⋈ w₂ /\ Q /Y/ (linker i₁,w₁) ->> (linker i₂,w₂).
imports: List Arith Lia Undecidability.Shared.Libs.DLW.Utils(utils) Undecidability.Shared.Libs.DLW.Code(subcode sss compiler)