calc_potassium_availability function

Calculate the K availability