vvalue
difference :: Ord peeraddr=> extraPeers -> Set peeraddr -> extraPeers-> PublicRootPeers extraPeers peeraddr-> Set peeraddr-> PublicRootPeers extraPeers peeraddr