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

Lemma updThread_comm :
forall tp  i j c pmap c' pmap'
(Hneq: i <> j)
(cnti : containsThread tp i)
(cntj : containsThread tp j)
(cnti': containsThread (updThread cntj c' pmap') i)
(cntj': containsThread (updThread cnti c pmap) j),
updThread cnti' c pmap = updThread cntj' c' pmap'.