exercises chapter 4, f#