Notation multi_fstep := (@multi_step Sem FineDilMem _ DryHybridMachine.DryHybridMachineSig).

(** FineConc is spinlock clean*)
Theorem fineConc_clean:
forall U tr tp m tp' m'
(Hexec: multi_fstep (U, [::], tp) m ([::], tr, tp') m'),
spinlock_clean tr.