(PROGN (PRIN1 "Use LOADDB to load database files!
" T) (ERROR!))
(" 4-Mar-85 09:09:05" . {ERIS}<SPEECH>MAILREADER>PROSE-LAFITE.;47)
FNS (BROWSER.FROM.FILE P.AUTHENTICATE P.QUIT.OR.READ.OLD.MAIL PROSE.LAFITE.PREPARE.BROWSER P.BYE 
P.CLOSE.BROWSER P.FILES.IN.ACTIVE.BROWSERS P.FIND.MSG.BODY P.LAFITE.START.NEW.USER 
P.OPEN.FOLDER.AND.GET.NEW.MAIL P.SURVEY.MSGS P.GETMAIL P.GETNEWMAIL P.LAFITE.BROWSE P.MAILFILE 
P.OPEN.BROWSER.ON.FILE P.PREPARE.HEADER P.READ.OLD.MAIL P.SAY.MSG? P.SAY.QUERY P.SEARCH.FOR.MAILFILE 
P.SELECT.AND.SAY.MSG P.SELECT.MSG MSG.IN.RANGE PREPARE.ADDRESSES PREPARE.DL PREPARE.NAME 
PREPARE.REGISTRY PREPARE.SINGLE.ADDRESS PREPARE.SITE \PROSE.LAFITE.PREPARE.BROWSER)
(READATABASE)
(
CALL BROWSER.FROM.FILE NIL P.AUTHENTICATE (WITH.MONITOR RESETLST OBTAIN.MONITORLOCK 
\LAFITE.GET.USER.DATA) P.QUIT.OR.READ.OLD.MAIL (P.CONTROLLER P.HELP) PROSE.LAFITE.PREPARE.BROWSER (
WITH.MONITOR RESETLST OBTAIN.MONITORLOCK \LAFITE.GETMAILFOLDER NLSETQ \LAFITE.OPENSTREAM ERRORN 
FULLNAME LAB.CREATEWINDOW) P.BYE (SUSPEND.PROCESS) P.CLOSE.BROWSER (RESETLST OBTAIN.MONITORLOCK APPEND
 LAB.FLUSHWINDOW CLOSEW WINDOWPROP DELFILE) P.FILES.IN.ACTIVE.BROWSERS (MAPCAR) P.FIND.MSG.BODY (BIN 
GETFILEPTR) P.LAFITE.START.NEW.USER (P.CHUNK P.CONTROLLER P.HELP SHOULDNT) 
P.OPEN.FOLDER.AND.GET.NEW.MAIL (P.OPEN.BROWSER.ON.FILE P.MAILFILE ADD1 P.GETMAIL CONCAT) P.SURVEY.MSGS
 (P.PREPARE.HEADER NTHMESSAGE IPLUS) P.GETMAIL (SETUPTIMER ITIMES \LAFITE.GETNEWMAIL) P.GETNEWMAIL (
\LAFITE.GETNEWMAIL RETFROM) P.LAFITE.BROWSE (\LAFITE.BROWSE) P.MAILFILE (GET.LOGININFO INFILEP 
P.SEARCH.FOR.MAILFILE CONCAT UNPACKFILENAME DELFILE CLOSEF OPENFILE PACKFILENAME GENSYM GETFILEINFO) 
P.OPEN.BROWSER.ON.FILE (BROWSER.FROM.FILE SETUPTIMER ITIMES) P.PREPARE.HEADER (LAFITE.FETCH.TO.FIELD 
MSG.LEN.TO.TIME CONCAT MKSTRING PREPARE.ADDRESSES U-CASE) P.READ.OLD.MAIL (P.OPEN.BROWSER.ON.FILE 
SETUPTIMER ITIMES CONCAT PLURAL? MKSTRING) P.SAY.MSG? (CONS P.CHUNK) P.SAY.QUERY NIL 
P.SEARCH.FOR.MAILFILE (DIRECTORY LIST PACK*) P.SELECT.AND.SAY.MSG (P.CHUNK ADD1) P.SELECT.MSG (
MSG.IN.RANGE CONCAT MKSTRING NTHMESSAGE P.PREPARE.HEADER) MSG.IN.RANGE NIL PREPARE.ADDRESSES (
CONCATLIST MAPCAR \GV.PARSERECIPIENTS CONCAT PREPARE.SINGLE.ADDRESS) PREPARE.DL (CONCAT) PREPARE.NAME 
(CONCAT) PREPARE.REGISTRY (MKSTRING CONCAT SASSOC) PREPARE.SINGLE.ADDRESS (CONCAT GNC ADD1 SUBSTRING 
PLUS PREPARE.DL SUB1 PACK* PREPARE.NAME PREPARE.REGISTRY PREPARE.SITE) PREPARE.SITE (CONCAT SASSOC) 
\PROSE.LAFITE.PREPARE.BROWSER (WITH.MONITOR RESETLST OBTAIN.MONITORLOCK \LAFITE.GETMAILFOLDER NLSETQ 
\LAFITE.OPENSTREAM ERRORN FULLNAME LAB.CREATEWINDOW) NIL
BIND BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL PROSE.LAFITE.PREPARE.BROWSER
 NIL P.BYE NIL P.CLOSE.BROWSER (MAILFOLDER) P.FILES.IN.ACTIVE.BROWSERS NIL P.FIND.MSG.BODY NIL 
P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL (RESULT) P.SURVEY.MSGS NIL P.GETMAIL (USER)
 P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE (NEW.LOGININFO) P.OPEN.BROWSER.ON.FILE (
P.FILES.IN.ACTIVE.BROWSERS) P.PREPARE.HEADER NIL P.READ.OLD.MAIL NIL P.SAY.MSG? (PARSEDMSG) 
P.SAY.QUERY (HEADER BODY) P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG (NO.OF.MSGS) P.SELECT.MSG NIL
 MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY NIL 
PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL \PROSE.LAFITE.PREPARE.BROWSER NIL NIL
NLAMBDA BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER NIL P.BYE NIL P.CLOSE.BROWSER NIL P.FILES.IN.ACTIVE.BROWSERS NIL 
P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER (USEDFREE) P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL 
P.SURVEY.MSGS NIL P.GETMAIL NIL P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL 
P.OPEN.BROWSER.ON.FILE NIL P.PREPARE.HEADER NIL P.READ.OLD.MAIL NIL P.SAY.MSG? NIL P.SAY.QUERY NIL 
P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG NIL MSG.IN.RANGE NIL PREPARE.ADDRESSES
 NIL PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL 
\PROSE.LAFITE.PREPARE.BROWSER NIL NIL
NOBIND BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER NIL P.BYE NIL P.CLOSE.BROWSER NIL P.FILES.IN.ACTIVE.BROWSERS NIL 
P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL 
P.GETMAIL NIL P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL P.OPEN.BROWSER.ON.FILE NIL 
P.PREPARE.HEADER NIL P.READ.OLD.MAIL NIL P.SAY.MSG? NIL P.SAY.QUERY (T) P.SEARCH.FOR.MAILFILE NIL 
P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG NIL MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL 
PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL 
\PROSE.LAFITE.PREPARE.BROWSER NIL NIL
RECORD BROWSER.FROM.FILE (MAILFOLDER) P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL (STATE STATEINFO) 
PROSE.LAFITE.PREPARE.BROWSER (MAILFOLDER STATE) P.BYE (STATE) P.CLOSE.BROWSER (MAILFOLDER) 
P.FILES.IN.ACTIVE.BROWSERS (MAILFOLDER) P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER (STATE USERINFO 
STATEINFO LAFITEINFO) P.OPEN.FOLDER.AND.GET.NEW.MAIL (STATE MAILFOLDER STATEINFO MSGS NEWMSGS) 
P.SURVEY.MSGS (STATE STATEINFO MAILFOLDER) P.GETMAIL (MAILFOLDER) P.GETNEWMAIL (MAILFOLDER) 
P.LAFITE.BROWSE NIL P.MAILFILE (STATE USERINFO LOGININFO) P.OPEN.BROWSER.ON.FILE (STATE MAILFOLDER 
LAFITEINFO) P.PREPARE.HEADER (LAFITEMSG MAILFOLDER STATE) P.READ.OLD.MAIL (STATE STATEINFO MAILFOLDER 
MSGS) P.SAY.MSG? (STATE PROSEINPUT STATEINFO HEARDMSGS) P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL 
P.SELECT.AND.SAY.MSG (MAILFOLDER STATE PROSEINPUT STATEINFO HEARDMSGS) P.SELECT.MSG (MAILFOLDER STATE 
PROSEINPUT) MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY 
NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL \PROSE.LAFITE.PREPARE.BROWSER (STATE MAILFOLDER) NIL
CREATE BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER NIL P.BYE NIL P.CLOSE.BROWSER NIL P.FILES.IN.ACTIVE.BROWSERS NIL 
P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL 
P.GETMAIL NIL P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL P.OPEN.BROWSER.ON.FILE NIL 
P.PREPARE.HEADER NIL P.READ.OLD.MAIL NIL P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL 
P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG NIL MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL 
PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL 
\PROSE.LAFITE.PREPARE.BROWSER NIL NIL
FETCH BROWSER.FROM.FILE (VERSIONLESSFOLDERNAME) P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL (STATEINFO)
 PROSE.LAFITE.PREPARE.BROWSER (BROWSERWINDOW FOLDERSTREAM) P.BYE (MAILFOLDER) P.CLOSE.BROWSER (
BROWSERWINDOW HARDCOPYSTREAM FOLDERNEEDSUPDATE FOLDERNEEDSEXPUNGE) P.FILES.IN.ACTIVE.BROWSERS (
VERSIONLESSFOLDERNAME) P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER (USERINFO USER STATEINFO LAFITEINFO
) P.OPEN.FOLDER.AND.GET.NEW.MAIL (MAILFOLDER #OFMESSAGES STATEINFO MSGS NEWMSGS) P.SURVEY.MSGS (
STATEINFO MESSAGEDESCRIPTORS) P.GETMAIL (BROWSERREADY BROWSERWINDOW) P.GETNEWMAIL (BROWSERWINDOW) 
P.LAFITE.BROWSE NIL P.MAILFILE (USERINFO TOUCHTONES MAILFILE) P.OPEN.BROWSER.ON.FILE (MAILFOLDER 
BROWSERREADY LAFITEINFO) P.PREPARE.HEADER (DATE SUBJECT FROM MESSAGELENGTH FIRSTSELECTEDMESSAGE 
MAILFOLDER) P.READ.OLD.MAIL (STATEINFO MAILFOLDER BROWSERREADY #OFMESSAGES MSGS) P.SAY.MSG? (
PROSEINPUT HEADER STATEINFO HEARDMSGS MSGNO EXAMINED) P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL 
P.SELECT.AND.SAY.MSG (#OFMESSAGES MAILFOLDER HEADER PROSEINPUT MSGDESCRIPTOR MSGNO 
FIRSTSELECTEDMESSAGE STATEINFO HEARDMSGS EXAMINED) P.SELECT.MSG (#OFMESSAGES MAILFOLDER 
FIRSTSELECTEDMESSAGE PROSEINPUT MESSAGEDESCRIPTORS MSGDESCRIPTOR) MSG.IN.RANGE NIL PREPARE.ADDRESSES 
NIL PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL 
\PROSE.LAFITE.PREPARE.BROWSER (BROWSERWINDOW FOLDERSTREAM MAILFOLDER) NIL
REPLACE BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL (QUIT READINGOLDMAIL) 
PROSE.LAFITE.PREPARE.BROWSER (MAILFOLDER FULLFOLDERNAME FOLDERSTREAM) P.BYE NIL P.CLOSE.BROWSER NIL 
P.FILES.IN.ACTIVE.BROWSERS NIL P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER (QUIT NONEWMAIL NEWMAIL) 
P.OPEN.FOLDER.AND.GET.NEW.MAIL (READINGNEWMAIL FIRSTNEW LASTNEW) P.SURVEY.MSGS (MSGSURVEY) P.GETMAIL 
NIL P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL P.OPEN.BROWSER.ON.FILE (MAILFOLDER FOLDEROPEN)
 P.PREPARE.HEADER NIL P.READ.OLD.MAIL (READINGOLDMAIL NOOFMSGS) P.SAY.MSG? (EXAMINED) P.SAY.QUERY NIL 
P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG (HEADER MSGDESCRIPTOR MSGNO 
FIRSTSELECTEDMESSAGE LASTSELECTEDMESSAGE) MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL 
PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL 
\PROSE.LAFITE.PREPARE.BROWSER (MAILFOLDER FULLFOLDERNAME FOLDERSTREAM) NIL
REFFREE BROWSER.FROM.FILE (\ACTIVELAFITEFOLDERS) P.AUTHENTICATE (\LAFITE.MAILSERVERLOCK) 
P.QUIT.OR.READ.OLD.MAIL NIL PROSE.LAFITE.PREPARE.BROWSER (\LAFITE.BROWSELOCK LAFITEBUFFERSIZE 
PROMPTWINDOW) P.BYE (STATE \PROSE.OPERATOR.PROCESS \TONE.MONITOR.PROCESS) P.CLOSE.BROWSER (
\LAFITE.BROWSELOCK \LAFITE.MAINLOCK) P.FILES.IN.ACTIVE.BROWSERS (\ACTIVELAFITEFOLDERS) P.FIND.MSG.BODY
 NIL P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL P.GETMAIL (
ONEMINUTE) P.GETNEWMAIL NIL P.LAFITE.BROWSE (LAFITEMAINMENU) P.MAILFILE (STATE) P.OPEN.BROWSER.ON.FILE
 (ONEMINUTE) P.PREPARE.HEADER (MAILFOLDER STATE) P.READ.OLD.MAIL (ONEMINUTE) P.SAY.MSG? NIL 
P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG (STATE) P.SELECT.MSG NIL MSG.IN.RANGE 
NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY (DEFAULTREGISTRY) 
PREPARE.SINGLE.ADDRESS (USERNAME DEFAULTREGISTRY) PREPARE.SITE NIL \PROSE.LAFITE.PREPARE.BROWSER (
\LAFITE.BROWSELOCK LAFITEBUFFERSIZE PROMPTWINDOW) NIL
REF BROWSER.FROM.FILE (MAILFILE) P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL (ITEM) 
PROSE.LAFITE.PREPARE.BROWSER (FOLDERNAME) P.BYE NIL P.CLOSE.BROWSER (FILE) P.FILES.IN.ACTIVE.BROWSERS 
(BROWSER) P.FIND.MSG.BODY (TEXTSTREAM) P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL (
USER) P.SURVEY.MSGS (LASTMSGNO FIRSTMSGNO MAILFOLDER) P.GETMAIL (\DurationLimit MAILFOLDER) 
P.GETNEWMAIL (MAILFOLDER) P.LAFITE.BROWSE (FILE) P.MAILFILE (USER USER.LOGININFO) 
P.OPEN.BROWSER.ON.FILE (FILESINUSE \DurationLimit) P.PREPARE.HEADER (MSGDESCRIPTOR LENGTH) 
P.READ.OLD.MAIL (MAILFILE \DurationLimit) P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE (USER) 
P.SELECT.AND.SAY.MSG (MAILFOLDER) P.SELECT.MSG (NO.OF.MSGS) MSG.IN.RANGE (NO.OF.MSG) PREPARE.ADDRESSES
 (RECIPIENTS NAME) PREPARE.DL (DLNAME) PREPARE.NAME (NAME) PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS
 (ADDRESS) PREPARE.SITE NIL \PROSE.LAFITE.PREPARE.BROWSER (FOLDERNAME) NIL
SETFREE BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER NIL P.BYE (P.HELP.FLG) P.CLOSE.BROWSER (\ACTIVELAFITEFOLDERS 
LAFITEEDITORWINDOWS \LAFITE.TEMPFILES \LAFITE.LAST.STATUS LAFITELASTMESSAGE LAFITEPRIMARYDISPLAYWINDOW
 \LAFITEDEFAULTHOST&DIR) P.FILES.IN.ACTIVE.BROWSERS NIL P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER (
LAFITEDEFAULTHOST&DIR \LAFITE.LAST.STATUS \LAFITE.READY \LAFITE.AUTHENTICATION.FAILURE) 
P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS (MESSAGES) P.GETMAIL NIL P.GETNEWMAIL NIL 
P.LAFITE.BROWSE NIL P.MAILFILE NIL P.OPEN.BROWSER.ON.FILE NIL P.PREPARE.HEADER NIL P.READ.OLD.MAIL NIL
 P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG NIL 
MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY NIL 
PREPARE.SINGLE.ADDRESS (CHAR) PREPARE.SITE NIL \PROSE.LAFITE.PREPARE.BROWSER NIL NIL
SET BROWSER.FROM.FILE (BROWSER) P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER (MAILFOLDER BROWSERWINDOW STREAM ERRN) P.BYE NIL P.CLOSE.BROWSER (FOLDER 
BROWSERWINDOW WINDOW) P.FILES.IN.ACTIVE.BROWSERS NIL P.FIND.MSG.BODY (A) P.LAFITE.START.NEW.USER NIL 
P.OPEN.FOLDER.AND.GET.NEW.MAIL (MAILFILE MAILFOLDER FIRSTNEW LASTNEW) P.SURVEY.MSGS (MSG) P.GETMAIL 
NIL P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE (MAILFILE HOST) P.OPEN.BROWSER.ON.FILE NIL 
P.PREPARE.HEADER (MINUTELENGTH MSG#) P.READ.OLD.MAIL (MAILFOLDER NO.MSGS) P.SAY.MSG? NIL P.SAY.QUERY 
NIL P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG (FIRSTSELECTEDMESSAGE) P.SELECT.MSG (MSG#) 
MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY NIL 
PREPARE.SINGLE.ADDRESS (ADDRESS.STRING TEMPSTRING NAME.END.POS NAME REGISTRY.END.POS REGISTRY 
SITE.END.POS SITE) PREPARE.SITE NIL \PROSE.LAFITE.PREPARE.BROWSER (MAILFOLDER BROWSERWINDOW STREAM 
ERRN) NIL
SMASHFREE BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL (STATE) 
PROSE.LAFITE.PREPARE.BROWSER (STATE) P.BYE NIL P.CLOSE.BROWSER NIL P.FILES.IN.ACTIVE.BROWSERS NIL 
P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER (STATE) P.OPEN.FOLDER.AND.GET.NEW.MAIL (STATE) 
P.SURVEY.MSGS (STATE) P.GETMAIL NIL P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL 
P.OPEN.BROWSER.ON.FILE (STATE) P.PREPARE.HEADER NIL P.READ.OLD.MAIL (STATE) P.SAY.MSG? (STATE) 
P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG (STATE) MSG.IN.RANGE 
NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS 
NIL PREPARE.SITE NIL \PROSE.LAFITE.PREPARE.BROWSER (STATE) NIL
SMASH BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER (MAILFOLDER) P.BYE NIL P.CLOSE.BROWSER NIL P.FILES.IN.ACTIVE.BROWSERS NIL
 P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL 
P.GETMAIL NIL P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL P.OPEN.BROWSER.ON.FILE NIL 
P.PREPARE.HEADER NIL P.READ.OLD.MAIL NIL P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL 
P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG (MAILFOLDER) MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL 
NIL PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL 
\PROSE.LAFITE.PREPARE.BROWSER (MAILFOLDER) NIL
PROP BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL PROSE.LAFITE.PREPARE.BROWSER
 NIL P.BYE NIL P.CLOSE.BROWSER (ICONWINDOW) P.FILES.IN.ACTIVE.BROWSERS NIL P.FIND.MSG.BODY NIL 
P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL P.GETMAIL NIL 
P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL P.OPEN.BROWSER.ON.FILE NIL P.PREPARE.HEADER NIL 
P.READ.OLD.MAIL NIL P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG NIL 
P.SELECT.MSG NIL MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL PREPARE.NAME NIL 
PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL \PROSE.LAFITE.PREPARE.BROWSER NIL NIL
TEST BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL PROSE.LAFITE.PREPARE.BROWSER
 (STREAM) P.BYE NIL P.CLOSE.BROWSER NIL P.FILES.IN.ACTIVE.BROWSERS NIL P.FIND.MSG.BODY NIL 
P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL P.GETMAIL NIL 
P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE (MAILFILE HOST OLDMAILONLY? UNKNOWN) 
P.OPEN.BROWSER.ON.FILE (MAILFILE) P.PREPARE.HEADER (MSG# SENDER DATE RECIPIENT SUBJECT MINUTELENGTH) 
P.READ.OLD.MAIL NIL P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG (MSG
) P.SELECT.MSG (MSG#) MSG.IN.RANGE (MSG) PREPARE.ADDRESSES NIL PREPARE.DL NIL PREPARE.NAME NIL 
PREPARE.REGISTRY (REGISTRY) PREPARE.SINGLE.ADDRESS (SITE REGISTRY) PREPARE.SITE (SITE) 
\PROSE.LAFITE.PREPARE.BROWSER (STREAM) NIL
TESTFREE BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER NIL P.BYE NIL P.CLOSE.BROWSER (\LAFITE.ACTIVE \LAFITEPROFILECHANGED) 
P.FILES.IN.ACTIVE.BROWSERS NIL P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER (\LAFITE.ACTIVE 
\LAFITE.LAST.STATUS) P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL P.GETMAIL NIL P.GETNEWMAIL 
NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL P.OPEN.BROWSER.ON.FILE NIL P.PREPARE.HEADER NIL P.READ.OLD.MAIL
 NIL P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG 
NIL MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY NIL 
PREPARE.SINGLE.ADDRESS (CHAR) PREPARE.SITE NIL \PROSE.LAFITE.PREPARE.BROWSER NIL NIL
PREDICATE BROWSER.FROM.FILE (EQUAL) P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER (OPENWP) P.BYE NIL P.CLOSE.BROWSER (WINDOWP OPENWP) 
P.FILES.IN.ACTIVE.BROWSERS NIL P.FIND.MSG.BODY (EOFP) P.LAFITE.START.NEW.USER (EQUAL) 
P.OPEN.FOLDER.AND.GET.NEW.MAIL (NLSETQ) P.SURVEY.MSGS (IGREATERP) P.GETMAIL (TIMEREXPIRED? NLSETQ) 
P.GETNEWMAIL (NLSETQ) P.LAFITE.BROWSE NIL P.MAILFILE (NLSETQ) P.OPEN.BROWSER.ON.FILE (MEMBER 
TIMEREXPIRED?) P.PREPARE.HEADER NIL P.READ.OLD.MAIL (NLSETQ TIMEREXPIRED?) P.SAY.MSG? NIL P.SAY.QUERY 
NIL P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG (NUMBERP MEMBER) P.SELECT.MSG NIL MSG.IN.RANGE (
IGEQ ILEQ) PREPARE.ADDRESSES NIL PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY (STREQUAL) 
PREPARE.SINGLE.ADDRESS (FMEMB STREQUAL) PREPARE.SITE NIL \PROSE.LAFITE.PREPARE.BROWSER (OPENWP) NIL
EFFECT BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER (TOTOPW EXPANDW SETFILEINFO TERPRI PRIN1 FORGETMAILFILE) P.BYE (P.CHUNK 
BLOCK ON.HOOK OFF.LINE P.CLOSE.BROWSER P.CONTROLLER.RESET P.SPEED ON.LINE BREAKCONNECTION WAKE.PROCESS
) P.CLOSE.BROWSER (\LAFITE.CLOSE.FOLDER \LAFITE.EXPUNGE.PROC MAPC \LAFITE.WRITE.PROFILE 
LAFITECLEARCACHE CLOSEF?) P.FILES.IN.ACTIVE.BROWSERS NIL P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER (
USEDFREE \LAFITE.AFTERLOGIN LAFITE BLOCK) P.OPEN.FOLDER.AND.GET.NEW.MAIL (P.CHUNK P.HELP) 
P.SURVEY.MSGS (P.CHUNK) P.GETMAIL (DECLARE DISMISS P.HELP RETFROM BLOCK P.CHUNK) P.GETNEWMAIL (P.CHUNK
) P.LAFITE.BROWSE NIL P.MAILFILE (P.CHUNK CHANGE.MAILFILE \LAFITE.BROWSE) P.OPEN.BROWSER.ON.FILE (
P.HELP \LAFITE.BROWSE DECLARE DISMISS) P.PREPARE.HEADER NIL P.READ.OLD.MAIL (P.HELP DECLARE DISMISS 
P.CHUNK P.SELECT.MSG) P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG (
P.SELECT.MSG P.MESSAGE.QUERY) P.SELECT.MSG (P.CHUNK P.HELP) MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL 
PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL 
\PROSE.LAFITE.PREPARE.BROWSER (TOTOPW EXPANDW SETFILEINFO TERPRI PRIN1 FORGETMAILFILE) NIL
CLISP BROWSER.FROM.FILE (for in until do finally) P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER (printout) P.BYE NIL P.CLOSE.BROWSER (for in bind do) 
P.FILES.IN.ACTIVE.BROWSERS (for in collect) P.FIND.MSG.BODY (for while do finally) 
P.LAFITE.START.NEW.USER (while do) P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS (for from to first
 do) P.GETMAIL (forDuration until do finally) P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL 
P.OPEN.BROWSER.ON.FILE (forDuration until do finally) P.PREPARE.HEADER NIL P.READ.OLD.MAIL (
forDuration until do finally) P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL 
P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG NIL MSG.IN.RANGE NIL PREPARE.ADDRESSES (for in collect) 
PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS (while do) PREPARE.SITE 
NIL \PROSE.LAFITE.PREPARE.BROWSER (printout) NIL
SPECVARS BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER NIL P.BYE NIL P.CLOSE.BROWSER NIL P.FILES.IN.ACTIVE.BROWSERS NIL 
P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL 
P.GETMAIL NIL P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL P.OPEN.BROWSER.ON.FILE NIL 
P.PREPARE.HEADER NIL P.READ.OLD.MAIL NIL P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL 
P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG NIL MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL 
PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL 
\PROSE.LAFITE.PREPARE.BROWSER NIL NIL
LOCALVARS BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER NIL P.BYE NIL P.CLOSE.BROWSER NIL P.FILES.IN.ACTIVE.BROWSERS NIL 
P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL 
P.GETMAIL (\DurationLimit) P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL P.OPEN.BROWSER.ON.FILE 
(\DurationLimit) P.PREPARE.HEADER NIL P.READ.OLD.MAIL (\DurationLimit) P.SAY.MSG? NIL P.SAY.QUERY NIL 
P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG NIL MSG.IN.RANGE NIL PREPARE.ADDRESSES
 NIL PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL 
\PROSE.LAFITE.PREPARE.BROWSER NIL NIL
APPLY BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER NIL P.BYE NIL P.CLOSE.BROWSER NIL P.FILES.IN.ACTIVE.BROWSERS NIL 
P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL 
P.GETMAIL (P.CONTROLLER) P.GETNEWMAIL (P.CONTROLLER) P.LAFITE.BROWSE NIL P.MAILFILE NIL 
P.OPEN.BROWSER.ON.FILE NIL P.PREPARE.HEADER NIL P.READ.OLD.MAIL NIL P.SAY.MSG? NIL P.SAY.QUERY NIL 
P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG NIL MSG.IN.RANGE NIL PREPARE.ADDRESSES
 NIL PREPARE.DL NIL PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL 
\PROSE.LAFITE.PREPARE.BROWSER NIL NIL
ERROR BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER NIL P.BYE NIL P.CLOSE.BROWSER NIL P.FILES.IN.ACTIVE.BROWSERS NIL 
P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL 
P.GETMAIL NIL P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL P.OPEN.BROWSER.ON.FILE NIL 
P.PREPARE.HEADER NIL P.READ.OLD.MAIL NIL P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL 
P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG NIL MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL 
PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL 
\PROSE.LAFITE.PREPARE.BROWSER NIL NIL
LOCALFREEVARS BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL 
PROSE.LAFITE.PREPARE.BROWSER NIL P.BYE NIL P.CLOSE.BROWSER NIL P.FILES.IN.ACTIVE.BROWSERS NIL 
P.FIND.MSG.BODY NIL P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL 
P.GETMAIL NIL P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL P.OPEN.BROWSER.ON.FILE NIL 
P.PREPARE.HEADER NIL P.READ.OLD.MAIL NIL P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL 
P.SELECT.AND.SAY.MSG NIL P.SELECT.MSG NIL MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL 
PREPARE.NAME NIL PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL 
\PROSE.LAFITE.PREPARE.BROWSER NIL NIL
ARGS BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL PROSE.LAFITE.PREPARE.BROWSER
 NIL P.BYE NIL P.CLOSE.BROWSER NIL P.FILES.IN.ACTIVE.BROWSERS NIL P.FIND.MSG.BODY NIL 
P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL P.GETMAIL NIL 
P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL P.OPEN.BROWSER.ON.FILE NIL P.PREPARE.HEADER NIL 
P.READ.OLD.MAIL NIL P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG NIL 
P.SELECT.MSG NIL MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL PREPARE.NAME NIL 
PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL \PROSE.LAFITE.PREPARE.BROWSER NIL NIL
USERTEMPLATES SHAZAM (CALL .. NIL) OP# (CALL) WINDOWPROP (CALL EVAL PROP EVAL . PPE) perform (MACRO 
ARGS (PERFORMTRAN ARGS T)) UNINTERRUPTABLY (CALL .. EVAL) WINDOWDELPROP (CALL EVAL PROP EVAL . PPE) 
PERFORM (MACRO ARGS (PERFORMTRAN ARGS T)) WINDOWADDPROP (CALL EVAL PROP EVAL EVAL . PPE) NIL
0 BROWSER.FROM.FILE NIL P.AUTHENTICATE NIL P.QUIT.OR.READ.OLD.MAIL NIL PROSE.LAFITE.PREPARE.BROWSER 
NIL P.BYE NIL P.CLOSE.BROWSER NIL P.FILES.IN.ACTIVE.BROWSERS NIL P.FIND.MSG.BODY NIL 
P.LAFITE.START.NEW.USER NIL P.OPEN.FOLDER.AND.GET.NEW.MAIL NIL P.SURVEY.MSGS NIL P.GETMAIL NIL 
P.GETNEWMAIL NIL P.LAFITE.BROWSE NIL P.MAILFILE NIL P.OPEN.BROWSER.ON.FILE NIL P.PREPARE.HEADER NIL 
P.READ.OLD.MAIL NIL P.SAY.MSG? NIL P.SAY.QUERY NIL P.SEARCH.FOR.MAILFILE NIL P.SELECT.AND.SAY.MSG NIL 
P.SELECT.MSG NIL MSG.IN.RANGE NIL PREPARE.ADDRESSES NIL PREPARE.DL NIL PREPARE.NAME NIL 
PREPARE.REGISTRY NIL PREPARE.SINGLE.ADDRESS NIL PREPARE.SITE NIL \PROSE.LAFITE.PREPARE.BROWSER NIL NIL

)