Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!swrinde!elroy.jpl.nasa.gov!decwrl!adobe!hawley
From: hawley@adobe.COM (Steve Hawley)
Newsgroups: comp.lang.forth
Subject: Re: One and One doesn't equal two It equals 1 - The Who
Keywords: What does this have to do with merits?
Message-ID: <13086@adobe.UUCP>
Date: 22 Mar 91 16:53:54 GMT
References: <1991Mar21.203114.7666@cbnewse.att.com>
Reply-To: hawley@adobe.UUCP (Steve Hawley)
Distribution: na
Organization: Adobe Systems Incorporated, Mountain View
Lines: 30

In article <1991Mar21.203114.7666@cbnewse.att.com> cwpjr@cbnewse.att.com (clyde.w.jr.phillips) writes:
>If I say : 1 1.004 : I have a waited value that can still be referred to
>as "1".
>
>I know of NO OTHER LANGUAGE that lets me SO MERRILY hide my complexity. 
...
>Now the challenge:
>
>Show me a shorter and cleaner way to weight an absolute ( from the user POV )
>value. Your choice of language, don't even have to have merit but must
>run on some existing computer we can test it on!

Forth:
: 1 1.004 ;
Scheme (or lisp):
(define 1 1.004)

This is a 5 character difference in length.  It can be reduced:
(define d define)
(d 1 1.004)
Such that the definition is the same length, but that's not the point.

The point is that, yes, this ability exists elsewhere in a clean fashion.

Steve Hawley
hawley@adobe.com
-- 
"Did you know that a cow was *MURDERED* to make that jacket?"
"Yes.    I didn't think there were any witnesses, so I guess I'll have to kill
 you too." -Jake Johansen