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 bareStep_det:
forall U tr tp m U' tr' tp' m' U'' tr'' tp'' m''
(Hstep: MachStep (U, tr, tp) m
(U', tr', tp') m')
(Hstep': MachStep (U, tr, tp) m
(U'', tr'', tp'') m''),
U' = U'' /\ tr' = tr'' /\ tp' = tp'' /\ m' = m''.