see /netlib/graphics/rainbow.c

.