End FineGrainedExecutions.
Section SCExecutions.
Context
{Sem : Semantics}
{initU : seq.seq nat}
{SemAx : CoreLanguage.SemAxioms}
{SemD : CoreLanguage.SemDet}.
Existing Instance BareMachine.resources.
Existing Instance HybridFineMachine.scheduler.
Existing Instance OrdinalPool.OrdinalThreadPool.
Existing Instance BareMachine.BareMachineSig.
Existing Instance BareDilMem.
Existing Instance bareMach.
Opaque containsThread mem_compatible.

Lemma step_thread_det:
forall tp m tid (cnt: containsThread tp tid) tp' m' tp'' m'' ev ev'
(Hcmpt: mem_compatible tp m)
(Hstep: threadStep cnt Hcmpt tp' m' ev)
(Hstep': threadStep cnt Hcmpt tp'' m'' ev'),
tp' = tp'' /\ m' = m'' /\ ev = ev'.