Arguments InA {A}{eqA} x _.
Arguments AMap.In {elt} x m.

Lemma gsoThreadRR {i j tp} (Hneq: i <> j) (cnti: containsThread tp i)
(cntj: containsThread tp j) p'
(cntj': containsThread (updThreadR cnti p') j) :
getThreadR cntj = getThreadR cntj'.