-- | @Noise_X1N:
--  -> e
--  <- e, ee
--  -> s
--  <- se
noiseX1N :: HandshakePattern
noiseX1N = handshakePattern "X1N" $
  initiator e *>
  responder (e *> ee) *>
  initiator s *>
  responder se
noiseX1N :: HandshakePattern
noiseX1N = handshakePattern "X1N" $
  initiator e *>
  responder (e *> ee) *>
  initiator s *>
  responder se
noiseX1N = handshakePattern "X1N" $
  initiator e *>
  responder (e *> ee) *>
  initiator s *>
  responder se