Jerzy K. pointed out that I had a typo somewhere: f = abs(val) should be changed to: f=abs f Checked my Scheme implementation and it turned out that I was making a typo during translation. S. Gonzi >