get_F function

Calculate F from harvest rate