some Scheme benchmarking with my own code