-- | @Noise_K1N:
--  -> s
--  ...
--  -> e
--  <- e, ee
--  -> se
noiseK1N :: HandshakePattern
noiseK1N = handshakePattern "K1N" $
  preInitiator s *>
  initiator e *>
  responder (e *> ee) *>
  initiator se
noiseK1N :: HandshakePattern
noiseK1N = handshakePattern "K1N" $
  preInitiator s *>
  initiator e *>
  responder (e *> ee) *>
  initiator se
noiseK1N = handshakePattern "K1N" $
  preInitiator s *>
  initiator e *>
  responder (e *> ee) *>
  initiator se