Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > comp.lang.forth > #25890
| From | "WJ" <w_a_x_man@yahoo.com> |
|---|---|
| Newsgroups | comp.lang.forth |
| Subject | Starting Forth 2. |
| Date | 2013-09-21 14:47 +0000 |
| Organization | A noiseless patient Spider |
| Message-ID | <l1kbit$npa$1@dont-email.me> (permalink) |
: 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
Back to comp.lang.forth | Previous | Next — Next in thread | Find similar | Unroll 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