proposition: Theorem terminating_P_to_bounded_M : SM.bounded M (1+uniform_termination_time).
proof: Proof. Proof using NP_spec. rewrite /SM.bounded. move=> x. have [z [Hz]]:= uniform_termination x. by move /(reachable_configurations Hz). Qed.
imports: Relation_Operators Operators_Properties Lia PeanoNat List Undecidability.StackMachines.Reductions.CM1_HALT_to_SMNdl_UB.SMX_facts Undecidability.StackMachines.Util(Nat_facts List_facts) ssreflect ssrbool ssrfun