WolframAlpha computational knowledge AI
√[(d - (√h*√[h + 2*R]))² + R²] - R, R=20903520, d=31688, h=0