fact: Definition compare_stacks := POP x (4+i) (7+i) :: POP y q q :: PUSH x Zero :: POP x i i :: POP y i q :: PUSH y Zero :: POP y q i :: POP y q p :: PUSH x' Zero :: POP x' q q :: nil.
imports: List Arith Lia Bool Undecidability.Shared.Libs.DLW(utils list_bool pos vec subcode sss) Undecidability.StackMachines.BSM(tiles_solvable bsm_defs)