@b=<>=~/ .* /;for$i(1..$`){($b[$_]+=$b[$_-$i])%=1e9+7for$i..($S=$&-$`*~-$`/2*$')}print$b[$S]+0