Mersenne Twister in PASCAL