Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!utgpu!water!watmath!watdcsu!bmaraldo
From: bmaraldo@watdcsu.UUCP
Newsgroups: comp.sys.hp
Subject: HP28C
Message-ID: <3969@watdcsu.waterloo.edu>
Date: Sun, 18-Oct-87 00:03:35 EDT
Article-I.D.: watdcsu.3969
Posted: Sun Oct 18 00:03:35 1987
Date-Received: Sun, 18-Oct-87 13:27:23 EDT
Distribution: comp
Organization: Unit 36 Research
Lines: 25


  When I compare the results of 253! from the programs below, I get
  accuracy differences.  What is the reason for this?  

  Program 1 (stack manipulation):     Program 2 (local variables):

  <<				      <<
   253 DUP DUP			       1 
   WHILE 1 > REPEAT		       1 253 FOR I
     1 - DUP				I *
     3 ROLL			       NEXT
     * SWAP			      >>
     DUP
   END
   DROP
 >>

 Results:   5.17346 09926 9 E 499  	FACT function
	    5.17346 09926 4 E 499	Program 2	
	    5.17346 09928 2 E 499	Program 1	
-- 
               --------     Unit 36 Research     ---------
	                "Alien Technology Today"
               -------------------------------------------
	                    bmaraldo@watdcsu