>>829を計算するプログラム作ってたんだけどバグ見つけた
同じ計算させてるのに1回目と2回目で結果が違う。
ちなみにV9なんだけど、V10もってる人ふるまい同じか試してみてくれない?

n = 2;

ss = Array[s, n];

u[n_] := s[n]/Sqrt[1 - Sum[s[i]^2, {i, n - 1}]]

v[1][ss_] := ss[[1]]

v[n_][ss_] :=
u[n] + Integrate[
v[n - 1][ss[[;; n - 1]]/Sqrt[1 - ss[[n]]^2/a[n]^2]], {a[n], u[n],
1}, Assumptions ->
And @@ Thread[0 < ss] && Sum[s[i]^2, {i, n}] < 1]

v[n][ss](*1回目*)
v[n][ss](*2回目*)