Local Open Scope nat_scope.
(** * Results related to machine predicates *)
(* Instantiation of modules *)
Section Machine.
Context (ge : genv).

Lemma getThreadR_fun i (tp : jstate ge) cnti cnti' x y :
@getThreadR _ _ _ i tp cnti = x ->
@getThreadR _ _ _ i tp cnti' = y ->
x = y.