// Check fingerprint of doub()
Ranlim32 myran2 = new Ranlim32(17);
localflag=false;
for (i=0;i<10;i++)
localflag=localflag || abs(myran2.doub()-fingerprint2[i])>sbeps;
globalflag = globalflag || localflag;
if (localflag) {
fail("*** Ranlim32: doub() does not match fingerprint");
}