Original code written by Eric Fintzel <fintzel@kaolin.unice.fr> (for version 0.94 !!) Hacked for version 2, and completely rewritten in STklos for version 3.1 by Erick Gallesio <eg@unice.fr>