f# combs 'for' version