home *** CD-ROM | disk | FTP | other *** search
/ T.C. 1,001 Programme der Spitzenklasse / T._C._1001_Programme_der_Spitzenklasse.iso / richter / 8547 / 8547.mhs / RICHTER.DTP / MERCURY / SERIES.EKA < prev    next >
Text File  |  1992-03-24  |  251b  |  9 lines
  1. ; Demo of infinite series.
  2.  
  3. ; Approximate sum using a large finite number of terms.
  4. approx_sum = SUM(1/(n*n),n,1,8000)
  5.  
  6. ; Mercury has special logic for an infinite sum, so just do it.
  7. infinite_sum = SUM(1/(n*n),n,1,INF)
  8. true_limit = PI^2 / 6
  9.