Re: [stack] impure concatenativity: let without translation
John Nowak <[email protected]>
| Newsgroups | gmane.comp.lang.concatenative |
|---|---|
| Message-ID | <[email protected]> |
On Mar 19, 2008, at 11:58 AM, Joe Bowbeer wrote:
> On Wed, Mar 19, 2008 at 1:58 AM, John Nowak wrote:
>
>> Just moments ago, I gave this example of the quadratic formula:
>>
>> (define (quad a b c)
>> (let ((d b 4 a c * * -)
>> (r d 0 >= [d sqrt] ["quad: sqrt of negative" error] if)
>> (x 2 a *)
>> (p b r - x /)
>> (n b r + x /))
>> p n))
>>
>>
>
> Is quad invoked postfix or prefix?
Postfix, as are *all* procedures. Only special forms are infix.
Perhaps this is a better declaration form:
(define (a b c quad)
...)
- John