(*

A simple application to run on the shim implementation.

Check for [Run] tags to find the initial state and the code for the
coordinator and the participants.

*)

Definition l := 0.(* Coordinator node *)
Definition cn := 0.(* Participant node *)
Definition p1 := 1.Definition p2 := 2.Definition p3 := 3.Fact Puniq : uniq pts.Definition coordinator :=
  coordinator_loop_zero l cn pts others Hnin Puniq PtsNonEmpty data_stream.(* Initial distributed state *)
Definition st_ptr := TPCProtocol.States.st.Definition log_ptr := TPCProtocol.States.log.

(* Specifications: *)
Lemma valid_init_dstate : valid init_dstate.