[Stack-cvs] stack-dev/maxima assessment.mac,1.4,1.5

[Chris S. <san...@us...>]

Update of /cvsroot/stack/stack-dev/maxima
In directory vz-cvs-3.sog:/tmp/cvs-serv2012/maxima

Modified Files:
	assessment.mac 
Log Message:


Index: assessment.mac
===================================================================
RCS file: /cvsroot/stack/stack-dev/maxima/assessment.mac,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** assessment.mac	16 Dec 2010 13:36:55 -0000	1.4
--- assessment.mac	3 May 2011 08:33:15 -0000	1.5
***************
*** 90,94 ****
      
  /* Write the number x in n decimal places */
! decimalplaces(x,n) := block([fpprintprec],fpprintprec:n,ev(float(round(10^n*float(x))/(10^n)),simp))$
  
  /* Write numbers in significant figures */
--- 90,94 ----
      
  /* Write the number x in n decimal places */
! decimalplaces(x,n) := ev(float(round(10^n*float(x))/(10^n)),simp)$
  
  /* Write numbers in significant figures */