For info, from the "about" page of the haiku site:
Quote:
A Forth Haiku is an attempt to mix mathematics, art, and the Forth programming language. It resembles a texture shader, however, the emphasis is on direct expression in the resulting image.
The Forth program describing each Haiku is run once per pixel over a square image. Forth cells are floating point. Conditions return 1 instead of -1. The position is available from the words x and y, which range from 0 to 1, which the origin in the lower left hand corner. The haiku returns the desired color in (red, green, blue, alpha), with alpha being topmost on the stack. If the stack has less than 4 items default values are assumed: red:0, green:0, blue:0, alpha:1.
A sample program, called "Disco:"
Code:
x 9.4 * sin
y 9.4 * sin
t 4 * sin
* *
dup t 2 * sin *
dup t 3 * sin *