project euler solutions in guile/scheme