fact: Definition SBTM_to_sigT (M : SBTM) := existT (fun n => Vector.t (option (Fin.t n * _ * _) * option (Fin.t n * _ * _)) n) (num_states M) (trans M).
imports: Undecidability.Synthetic(Definitions EnumerabilityFacts) Undecidability.TM.SBTM