(FILECREATED "13-JAN-83 22:22:32" {PHYLUM}<BURTON>ORB>MAPINIT.;1 423 changes to: (VARS MAPINITCOMS) (FNS MAPINIT)) (* Copyright (c) 1983 by Xerox Corporation) (PRETTYCOMPRINT MAPINITCOMS) (RPAQQ MAPINITCOMS ((FNS MAPINIT))) (DEFINEQ (MAPINIT [LAMBDA NIL (FILESLOAD NOTEPAD SKETCH MAP ICONFNS PHOTODEMO]) ) (PUTPROPS MAPINIT COPYRIGHT ("Xerox Corporation" 1983)) (DECLARE: DONTCOPY (FILEMAP (NIL (253 345 (MAPINIT 263 . 343))))) STOP