(FILECREATED " 4-SEP-80 23:46:47" <IDL>EGGS.DATA;7
    1741

     changes to:  EGGSCOMS

     previous date: "30-JAN-79 09:32:52" <IDL>EGGS.DATA;6)


(PRETTYCOMPRINT EGGSCOMS)

(RPAQQ EGGSCOMS
 ((P (PRIN1 "Dempster egg data.  Standard IDL Demo" T)
		    (TERPRI T))
		 (VARS S SNILS)
		 (P (PRIN1 
	       "Load complete.
S reset to Dempster egg data.
SNILS reset to Dempster with NILS.
"
			   T))))
(PRIN1 "Dempster egg data.  Standard IDL Demo" T)
(TERPRI T)

(RPAQ S
 (READIDLARRAY))
("MEASURES ON A DOZEN EGGS"
((EGG=12)
 (VARIABLE=6 LENGTH WIDTH VOLUME (ROW (1.0 BACK) (2.0 FRONT))
      FURROW (COLOR (-1.0 BROWN) (1.0 WHITE))
     ) )
(.7659 .636 2.031 1.0 1.0 -1.0 .7353 .6198 1.982 1.0 2.0 1.0 .7416 .628 1.995 1.0 3.0 1.0 .76 .628 
2.019 1.0 4.0 -1.0 .7861 .6239 2.031 1.0 5.0 -1.0 .7539 .6156 1.956 1.0 6.0 -1.0 .7747 .6156 2.007 2.0
 1.0 1.0 .7718 .6239 1.995 2.0 2.0 1.0 .7889 .6114 1.995 2.0 3.0 -1.0 .7659 .6072 1.995 2.0 4.0 1.0 
.7689 .6156 1.995 2.0 5.0 -1.0 .7478 .6239 2.007 2.0 6.0 -1.0 ))

(RPAQ SNILS
 (READIDLARRAY))
("MEASURES ON A DOZEN EGGS"
((EGG=14)
 (VARIABLE=6 LENGTH WIDTH VOLUME (ROW (1.0 BACK) (2.0 FRONT))
      FURROW (COLOR (-1.0 BROWN) (1.0 WHITE))
     ) )
(NIL NIL NIL NIL NIL NIL .7659 .636 2.031 1.0 1.0 -1.0 .7353 .6198 1.982 1.0 2.0 1.0 .7416 .628 1.995 
1.0 3.0 1.0 .76 .628 2.019 1.0 4.0 -1.0 .7861 .6239 2.031 1.0 5.0 -1.0 .7539 .6156 1.956 1.0 6.0 -1.0 
.7747 .6156 2.007 2.0 1.0 1.0 .7718 .6239 1.995 2.0 2.0 1.0 .7889 .6114 1.995 2.0 3.0 -1.0 .7659 .6072
 1.995 2.0 4.0 1.0 .7689 .6156 1.995 2.0 5.0 -1.0 .7478 .6239 2.007 2.0 6.0 -1.0 NIL NIL NIL NIL NIL 
NIL ))
(PRIN1 "Load complete.
S reset to Dempster egg data.
SNILS reset to Dempster with NILS.
" T)
(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP