Definition orig_packet := @packet _ orig_multi_params.Definition orig_network := @network _ orig_multi_params.Definition seq_num_packet := @packet _ multi_params.Definition seq_num_network := @network _ multi_params.Definition revertPacket (p : seq_num_packet) : orig_packet :=
    @mkPacket _ orig_multi_params (pSrc p) (pDst p) (tmMsg (pBody p)).Definition pkt_eq_dec (x y : seq_num_packet) : {x = y} + {x <> y}.

Lemma network_eq (net net' : orig_network) : nwState net = nwState net' -> nwPackets net = nwPackets net' -> net = net'.