fact: Definition DoActions : pTM sigSim unit 1 := match finMin_opt n with | None => Move Rmove | Some i => Move Rmove;; DoActions_Loop i end.
imports: Undecidability.TM.Basic.Mono Undecidability.TM.Combinators.Combinators Undecidability.TM.Code.Code Undecidability.TM.Single.EncodeTapes Undecidability.TM.Compound(TMTac MoveToSymbol Multi Shift)