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

Groups > comp.lang.forth > #25895

Re: Starting Forth 2.

From "WJ" <w_a_x_man@yahoo.com>
Newsgroups comp.lang.forth
Subject Re: Starting Forth 2.
Date 2013-09-21 17:28 +0000
Organization A noiseless patient Spider
Message-ID <l1kkv5$evh$1@dont-email.me> (permalink)
References <l1kbit$npa$1@dont-email.me>

Show all headers | View raw

WJ wrote:

> 
> : QUADRATIC ( a b c x -- n )
>     >R SWAP ROT R@ * + R> * + ;
> 
> Indecipherable stack-juggling.  Nobody with any sense
> would pay anybody to write unmaintainable code like that.
> 
> 
> Julia:
> 
> quadratic(a,b,c,x) = (a*x+b)x+c
> 
> quadratic(2,7,9,3)
> 48

quadratic(1_987_654_321, 7,9, BigInt(999_987_654_321))
1987605243418529845613568022098417

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

Thread

Starting Forth 2. "WJ" <w_a_x_man@yahoo.com> - 2013-09-21 14:47 +0000
  Re: Starting Forth 2. "WJ" <w_a_x_man@yahoo.com> - 2013-09-21 17:28 +0000
    Re: Starting Forth 2. mhx@iae.nl - 2013-09-21 13:32 -0700

csiph-web