still trying to get problem #3 in f#