(** ***Lemmas about suspend steps*)

Corollary gsoThreadC_suspend:
forall m tp tp' i j (cnt: containsThread tp i) (cntj: containsThread tp j)
(cntj': containsThread tp' j) (Hneq: i <> j)
(Hsuspend: suspend_thread m cnt tp'),
getThreadC cntj = getThreadC cntj'.