úÎ ^ îNoneConvert  to . If the address is 9 an IPv4-embedded IPv6 address, the IPv4 is extracted. import Network.SocketHas <- getAddrInfo (Just defaultHints) (Just "example.org") (Just "http")!map (showSockAddr.addrAddress) aso["93.184.216.119","93.184.216.119","2606:2800:220:6d:26bf:1447:1097:aa7","2606:2800:220:6d:26bf:1447:1097:aa7"]Convert  to . If the address is 9 an IPv4-embedded IPv6 address, the IPv4 is extracted. import Network.SocketFas <- 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.0Network.SockAddr showSockAddrshowSockAddrBSnetwork-2.4.1.2Network.Socket.TypesSockAddrbaseGHC.BaseStringbytestring-0.10.0.2Data.ByteString.Internal ByteString isReversedshowIPv4showIPv6