Help Needed

[Artur]

Dear Seqfans,
I'm looking person which can help to find the first number x such
(x^16+1)&(x^16+3)&(x^16+7)&(x^16+9) are all primes
I was tested that no such x smallest as 30000001 and now I was execute  
procedure to 40000001

I'm looking for person which can try find these number in range 40000001,  
50000000

e.g. by Mathematica procedure

Do[If[(PrimeQ[x^16 + 1]) && (PrimeQ[x^16 + 3]) && (PrimeQ[x^16 + 7]) &&
(PrimeQ[x^16 + 9]), Print[x]], {x, 40000001, 50000000}]

These number existed because Schinzel in 1959 prooved that set of this  
numbers is infinite

BEST WISHES
ARTUR