Updated and documented the code.
The current set works.
Authored by: keess 2007-10-15
Parent: [r1701]
Child: [r1703]
