Proof using naetsi rri.
intros.
eapply lift_prop; eauto using no_append_entries_to_self_invariant.
Qed.

(* Specifications: *)
Lemma ghost_packet :
forall (net : network (params := raft_refined_multi_params)) p,
In p (nwPackets net) ->
In (deghost_packet p) (nwPackets (deghost net)).