proposition: Theorem mma2_simulator n i (P : list (mm_instr (pos (S n)))) : { Q | forall v, (i,P) //ₐ (i,v) ↓ <-> (1,Q) //ₐ (1,v) ~~> (0,vec_zero) }.
proof: Proof. exists (mma_mma0_sim i P); apply mma_mma0_sim_spec. Qed.
imports: List Arith Lia Undecidability.Shared.Libs.DLW(utils pos vec subcode sss compiler_correction) Undecidability.MinskyMachines.MMA(mma_defs mma_utils)