finding mersenne numbers

someone needs tp have the time, to run this for a some hours :D