vvalue
controlReceiver :: (KESAlgorithm (KES c), Monad m)=> m (Maybe (VerKeyKES (KES c)))-> m (Maybe (VerKeyKES (KES c)))-> m (Maybe (VerKeyKES (KES c)))-> OCert c -> m RecvResult-> m (AgentInfo c)-> Client (ControlProtocol m c) 'NonPipelined 'InitialState m ()