Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > comp.lang.forth > #11754

Re: Riemann zeta function in Forth

From mhx@iae.nl
Newsgroups comp.lang.forth
Subject Re: Riemann zeta function in Forth
Date 2012-04-29 11:49 -0700
Organization http://groups.google.com
Message-ID <10309024.425.1335725354962.JavaMail.geo-discussion-forums@vbmi19> (permalink)
References <c81633a8-c351-4497-853d-62cb7d0c9f77@f17g2000yqj.googlegroups.com> <23741374.234.1335716291651.JavaMail.geo-discussion-forums@vbez18>

Show all headers | View raw

On Sunday, April 29, 2012 6:18:11 PM UTC+2, m...@iae.nl wrote:
> Krishna Myneni writes Re: Riemann zeta function in Forth
> 
> > It's probably time to implement the Riemann zeta function in Forth.
> 
> > http://physics.aps.org/synopsis-for/10.1103/PhysRevLett.108.170601
> 
> See below!
> 
> -marcel
> -- ---------------------

Of course, it works for non-integers and complex floats too:

: ZZETA ( F: z1 -- z2 )
	ZLOCAL x 
	0+0i
	0 N 1- 
	     ?DO
		N []Zc@  I []Zc@ F-  0e R,I->Z
		I 1+ S>F 0e R,I->Z x Z**  Z/  ZSWAP Z-
	-1 +LOOP 
	( sum) N []Zc@ Z/F   
	2+0i x ZNEGATE Z**  Z2*  1+0i ZSWAP Z-  Z/ ;

2.5e 1.25e zzeta 22 +ze.r (1.0766731004736795343e+0000 -2.5667157846102185318e-0001)

[..]

-marcel

Back to comp.lang.forth | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread

Thread

Riemann zeta function in Forth Krishna Myneni <krishna.myneni@ccreweb.org> - 2012-04-28 07:48 -0700
  Re: Riemann zeta function in Forth mhx@iae.nl - 2012-04-29 09:18 -0700
    Re: Riemann zeta function in Forth mhx@iae.nl - 2012-04-29 11:49 -0700
      Re: Riemann zeta function in Forth Krishna Myneni <krishna.myneni@ccreweb.org> - 2012-04-29 17:08 -0700
        Re: Riemann zeta function in Forth mhx@iae.nl - 2012-04-29 23:47 -0700
          Re: Riemann zeta function in Forth Krishna Myneni <krishna.myneni@ccreweb.org> - 2012-04-30 04:17 -0700
          Re: Riemann zeta function in Forth mhx@iae.nl - 2012-04-30 07:25 -0700
            Re: Riemann zeta function in Forth "A. K." <akk@nospam.org> - 2012-04-30 16:59 +0200
              Re: Riemann zeta function in Forth mhx@iae.nl - 2012-04-30 09:33 -0700
                Re: Riemann zeta function in Forth Krishna Myneni <krishna.myneni@ccreweb.org> - 2012-04-30 15:21 -0700
                Re: Riemann zeta function in Forth Andrew Haley <andrew29@littlepinkcloud.invalid> - 2012-05-01 02:53 -0500
                Re: Riemann zeta function in Forth "Elizabeth D. Rather" <erather@forth.com> - 2012-05-01 08:37 -1000
          Re: Riemann zeta function in Forth Krishna Myneni <krishna.myneni@ccreweb.org> - 2012-05-02 07:06 -0700
            Re: Riemann zeta function in Forth Hans Bezemer <the.beez.speaks@gmail.com> - 2012-05-03 17:43 +0200
              Re: Riemann zeta function in Forth Krishna Myneni <krishna.myneni@ccreweb.org> - 2012-05-03 19:33 -0700
                Re: Riemann zeta function in Forth The Beez <the.beez.speaks@gmail.com> - 2012-05-04 01:39 -0700
                Re: Riemann zeta function in Forth Krishna Myneni <krishna.myneni@ccreweb.org> - 2012-05-04 15:26 -0700
                Re: Riemann zeta function in Forth The Beez <the.beez.speaks@gmail.com> - 2012-05-05 02:55 -0700

csiph-web