Problem:
MathJax.Hub.Config({ tex2jax: { inlineMath: [["$","$"], ["\\(","\\)"]], processEscapes: true }});

野球観戦

先日，あなたの競技プログラミング仲間であるOさんは野球観戦に出かけた．
観戦した試合は，チームXとチームYの合計 4 試合の対戦だったが，一方的な展開となり，全試合でチームXが勝利した．
しかも，4 試合を通じたXの合計得点は 33 点だったのに対し，Yの合計得点はたったの 4 点だった．

あまりに一方的な内容のため，試合内容への興味が薄れてしまったOさんは，試合を観戦している間も競技プログラミングの作問ネタをついつい考えてしまっていた．
その甲斐もあって，Oさんは以下のような問題を思いついた．

野球チームXとYが対戦し，Xが勝った試合数，Yが勝った試合数，引き分けの試合数がそれぞれ A, B, C 試合だったとする．
また，全 A+B+C 試合を通じたX，Yの総得点は，それぞれ SX 点，SY 点だったとする．得点は全て 0 以上の整数である．
XとYが合計 A+B+C 試合対戦したとき，全試合の結果としてこのような条件を満たす各試合のスコアの並びは何通り有り得るだろうか？

ここで，ある試合で勝利する条件は，その試合における得点が，相手チームの得点よりも多いことであり，等しい場合は引き分けとなる．

また，各試合のスコアの並びを求める際，対戦した全試合の結果を比べた時，XとYの得点の組み合わせが同じでも，その順序が異なれば区別する必要がある．
例えば，XとYが 2 試合対戦した結果，共に 1 勝ずつし，引き分けが無く，XとYの総得点が共に 1 点ずつだったとする．
この場合，各試合におけるX，Yの得点を (Xの得点) - (Yの得点) という表記で表し，合計 2 試合の結果を並べると，以下の 2 通りが与えられた条件を満たす．

1 - 0, 0 - 1

0 - 1, 1 - 0

試合の順序を区別して数えるので，これらは区別される．

あなたにはこの答えを求めるプログラムを作って欲しい．
ただし，求める数はとても大きい数になり得るため，求める数を 1,000,000,007 で割った余りを答えるようにして欲しい．

Input

入力は複数のデータセットからなる．
各データセットは 1 行からなり，次の形式で表される．

A B C SX SY

ここで，A はチームXの勝利数，B はチームYの勝利数，C は引き分けの試合数，SX はチームXの総得点，SY はチームYの総得点を表す．
A, B, C, SX, SY は全て 0 以上 1,000,000 以下の整数であり，かつ 0 < A+B+C を満たす．

入力の終わりは，5 つのゼロからなる行で示される．

Output

各データセットについて，与えられた条件を満たす場合の数を 1,000,000,007 で割った余りのみからなる行を 1 行で出力せよ．

Sample Input

1 1 0 1 1
0 0 2 3 2
4 0 0 33 4
5 4 2 20 25
4726 87361 2742 23497 162843
328324 420923 12782 834286 538297
0 0 0 0 0

Output for Sample Input

2
0
114660
512095631
673703234
166259450

Solution in Ruby (judge verdict: Accepted)

#!/usr/bin/ruby
M=5000000
MOD=1000000007
inv=[1]*M
fact=[1]*M
factr=[1]*M
2.upto(M-1){|i|
	inv[i]=(MOD-MOD/i)*inv[MOD%i]%MOD
	fact[i]=i*fact[i-1]%MOD
	factr[i]=inv[i]*factr[i-1]%MOD
}
comb=->n,k{
	return 0 if k<0||n<k
	fact[n]*factr[k]*factr[n-k]%MOD
}
h=->n,k{comb[n+k-1,k]}

loop{
	a,b,c,sx,sy=gets.split.map(&:to_i)
	break if a+b+c==0
	if sx<sy || (sx==sy&&a<b)
		a,b=b,a
		sx,sy=sy,sx
	end
	d=sx-sy
	r=0
	if a==0 # x??????????????????????????????????????????????????§???x??????????????????0????????°y??????????????????0??§???????????°?????????
		if b>0 || sx!=sy
			r=0
		else
			r=h[c,sx]
		end
	elsif b==0
		r=z=h[a,d-a]*h[a+b+c,sx-d]
	else
		([a,d+b].max..sx).each{|w|
			r=(r+h[a,w-a]*h[b,w-d-b]*h[a+b+c,sx-w])%MOD
		}
	end
	p r*comb[a+b+c,a]*comb[b+c,b]%MOD
}