Lucas-Lehmer test: Difference between revisions

Improve Seed7 example
(Add Seed7 example)
(Improve Seed7 example)
Line 1,197:
testNum +:= 2;
end while;
prime := number rem testNum <> 0upTo;
end if;
end func;