GoldenRatio, haskell profiling exercise.