(FILECREATED "31-Oct-86 14:45:54" {PHYLUM}<TAMARIN>MTEST.;1
 601    

      changes to:  (VARS MTESTCOMS aaa)
		   (FNS MTest))


(* Copyright (c) 1986 by Xerox Corporation. All rights reserved.)

(PRETTYCOMPRINT MTESTCOMS)

(RPAQQ MTESTCOMS
 ((VARS aaa)
		    (FNS MTest)))

(RPAQQ aaa
 234.0)
(DEFINEQ

(MTest

  [LAMBDA NIL                                                (* edited: "31-Oct-86 14:40")

    (
PROG
 (b (a aaa))
	    (
RPTQ
 10000 (
SETQ
 b (
FTIMES
 a 23.0)))
	    (
RETURN
 b])
)
(PUTPROPS MTEST COPYRIGHT ("Xerox Corporation" 1986))
(DECLARE: DONTCOPY
  (FILEMAP (NIL (306 525 (MTest 316 . 523)))))
STOP