# pop3 protocol independent access to an email server. Pop3: module{	PATH: con "/dis/lib/pop3.dis"; 	# all functions return status (-ve when error)          # open a connection with the pop3 server         # requires the email server's name or address or nil if a default server is to be used	# returns (status, errror string)         open: fn(user, password, server: string) : (int, string); 	# stat the user's mailbox 	# returns (status, error string, no. messages, total no. bytes)	stat: fn(): (int, string, int, int); 	# list the user's mailbox	# returns (status, error string, list of (message no., bytes in message))	msglist: fn(): (int, string, list of (int, int)); 	# list as above but return (status, error string, list of message nos.)	msgnolist: fn(): (int, string, list of int); 	# top of a message given it's no.	# returns (status, error string, message top)	top: fn(m: int) : (int, string, string); 	# full text of a message given it's no.	# returns (status, error string, message)	get: fn(m: int) : (int, string, string); 	# delete a message given it's no.	# returns (status, error string)	delete: fn(m: int) : (int, string);          # close the connection	# returns (status, error string)         close: fn(): (int, string);};