Limit[AppellF1[3/2, 1, k, 2, x, y/k], k -> Infinity]