(FILECREATED " 5-Jun-84 14:29:51" {PHYLUM}<LISPCORE>NEXT>INIT.CIS;4 3463   

      changes to:  (VARS INITCOMS)

      previous date: "31-May-84 12:11:12" {PHYLUM}<LISPCORE>NEXT>INIT.CIS;3)


(* Copyright (c) 1983, 1984 by Xerox Corporation)

(PRETTYCOMPRINT INITCOMS)

(RPAQQ INITCOMS [(* This is the CIS system greeting file.)
		 (VARS [USERGREETFILES (QUOTE (({ERIS}< USER >LISP>INIT. COM)
					       ({ERIS}< USER >LISP>INIT)
					       ({ERIS}< USER >INIT. COM)
					       ({ERIS}< USER >INIT.LISP)
					       ({PHYLUM}< USER >LISP>INIT. COM)
					       ({PHYLUM}< USER >LISP>INIT)
					       ({PHYLUM}< USER >INIT. COM)
					       ({PHYLUM}< USER >INIT.LISP)
					       ({IVY}< USER >LISP>INIT. COM)
					       ({IVY}< USER >LISP>INIT)
					       ({IVY}< USER >INIT. COM)
					       ({IVY}< USER >INIT.LISP]
		       (FONTDIRECTORIES (QUOTE ({INDIGO}<ALTOFONTS> {INDIGO}<ALTOFONTS>ORIGINAL> 
								    {DSK})))
		       (NSFONTDIRECTORIES (QUOTE ({PHYLUM}<STARFONTS>SCREEN>LFONTS>)))
		       (NSFONTWIDTHSDIRECTORIES (QUOTE ({PHYLUM}<STARFONTS>FORMATTER>WIDTHS>)))
		       (STARFONTDIRECTORIES (QUOTE ({PHYLUM}<STARFONTS>)))
		       (FONTWIDTHSFILES (QUOTE ({INDIGO}<FONTS>FONTS.WIDTHS {DSK}FONTS.WIDTHS)))
		       (DIRECTORIES (QUOTE ({ERIS}<LISP>LIBRARY> {ERIS}<LISPUSERS> 
								 {PHYLUM}<LISP>LIBRARY> 
								 {PHYLUM}<LISPUSERS>)))
		       (LISPUSERSDIRECTORIES (QUOTE ({ERIS}<LISP>LIBRARY> {ERIS}<LISPUSERS> 
									  {PHYLUM}<LISP>LIBRARY> 
									  {PHYLUM}<LISPUSERS>)))
		       (COPYRIGHTFLG (QUOTE YES))
		       (COPYRIGHTRESERVED T))
		 (VARS (DEFAULTREGISTRY (QUOTE PA))
		       (DEFAULTPRINTINGHOST (QUOTE (Quake LispPrint:XSIS% North)))
		       (CH.NET.HINT 132)
		       (CH.DEFAULT.ORGANIZATION "Xerox")
		       (CH.DEFAULT.DOMAIN "XSIS North"))
		 (P (ADDTOVAR NETWORKOSTYPES (MAXC2 . TENEX)
			      (GSLVAX . VMS))
		    (LOGIN NIL (QUOTE QUIET])



(* This is the CIS system greeting file.)


(RPAQQ USERGREETFILES (({ERIS}< USER >LISP>INIT. COM)
		       ({ERIS}< USER >LISP>INIT)
		       ({ERIS}< USER >INIT. COM)
		       ({ERIS}< USER >INIT.LISP)
		       ({PHYLUM}< USER >LISP>INIT. COM)
		       ({PHYLUM}< USER >LISP>INIT)
		       ({PHYLUM}< USER >INIT. COM)
		       ({PHYLUM}< USER >INIT.LISP)
		       ({IVY}< USER >LISP>INIT. COM)
		       ({IVY}< USER >LISP>INIT)
		       ({IVY}< USER >INIT. COM)
		       ({IVY}< USER >INIT.LISP)))

(RPAQQ FONTDIRECTORIES ({INDIGO}<ALTOFONTS> {INDIGO}<ALTOFONTS>ORIGINAL> {DSK}))

(RPAQQ NSFONTDIRECTORIES ({PHYLUM}<STARFONTS>SCREEN>LFONTS>))

(RPAQQ NSFONTWIDTHSDIRECTORIES ({PHYLUM}<STARFONTS>FORMATTER>WIDTHS>))

(RPAQQ STARFONTDIRECTORIES ({PHYLUM}<STARFONTS>))

(RPAQQ FONTWIDTHSFILES ({INDIGO}<FONTS>FONTS.WIDTHS {DSK}FONTS.WIDTHS))

(RPAQQ DIRECTORIES ({ERIS}<LISP>LIBRARY> {ERIS}<LISPUSERS> {PHYLUM}<LISP>LIBRARY> {PHYLUM}<LISPUSERS>)
)

(RPAQQ LISPUSERSDIRECTORIES ({ERIS}<LISP>LIBRARY> {ERIS}<LISPUSERS> {PHYLUM}<LISP>LIBRARY> 
						  {PHYLUM}<LISPUSERS>))

(RPAQQ COPYRIGHTFLG YES)

(RPAQQ COPYRIGHTRESERVED T)

(RPAQQ DEFAULTREGISTRY PA)

(RPAQQ DEFAULTPRINTINGHOST (Quake LispPrint:XSIS% North))

(RPAQQ CH.NET.HINT 132)

(RPAQ CH.DEFAULT.ORGANIZATION "Xerox")

(RPAQ CH.DEFAULT.DOMAIN "XSIS North")
(ADDTOVAR NETWORKOSTYPES (MAXC2 . TENEX)
	  (GSLVAX . VMS))
(LOGIN NIL (QUOTE QUIET))
(PUTPROPS INIT.CIS COPYRIGHT ("Xerox Corporation" 1983 1984))
(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP