Îõ³h$èÎNoneÆsockaddrConvert  to Ì. If the address is an IPv4-embedded IPv6 address, the IPv4 is extracted.import Network.SocketÈas <- getAddrInfo (Just defaultHints) (Just "example.org") (Just "http")!map (showSockAddr.addrAddress) asï["93.184.216.119","93.184.216.119","2606:2800:220:6d:26bf:1447:1097:aa7","2606:2800:220:6d:26bf:1447:1097:aa7"]sockaddrConvert  to Ì. If the address is an IPv4-embedded IPv6 address, the IPv4 is extracted.import Network.SocketÆas <- getAddrInfo (Just defaultHints) (Just "localhost") (Just "http")#map (showSockAddrBS.addrAddress) as(["127.0.0.1","::1","fe80:0:0:0:0:0:0:1"]  %sockaddr-0.0.1-F22kkMtpCRSBiBDu434PThNetwork.SockAddr showSockAddrshowSockAddrBS&network-3.1.2.7-3UJXfpkdLcdBrRVDkXEXqjNetwork.Socket.TypesSockAddrbaseGHC.BaseStringbytestring-0.10.10.0Data.ByteString.Internal ByteString