Section ATOMIC.
Variable L: semantics.
Hypothesis Lwb: well_behaved_traces L.
Remark atomic_finish: forall s t, output_trace t -> Star (atomic L) (t, s) t (E0, s).
Remark star_atomic_output_trace:
forall s t t' s',
Star (atomic L) (E0, s) t (t', s') -> output_trace t'.

Theorem atomic_behaviors:
forall beh, program_behaves L beh <-> program_behaves (atomic L) beh.