/* spiral.h  spiral trough */
double spiral(double x, double y);