Proof using.
unfold mgv_deghost.
simpl.
intros.
do_in_map.
subst. simpl.
eauto.
Qed.

(* Specifications: *)
Lemma state_machine_safety'_state_same_packet_subset :
msg_refined_raft_net_invariant_state_same_packet_subset
(fun net : ghost_log_network =>  state_machine_safety' (mgv_deghost net)).