hermann on Wed, 27 Nov 2024 22:54:23 +0100 |
[Date Prev] [Date Next] [Thread Prev] [Thread Next] [Date Index] [Thread Index]
25! with early aborts: 31ms to find minimal 5x5 square of distinct primes with sum of rows/cols/diags prime and total sum prime(!) |
I always get surprised how easy things can be done with PARI/GP.My first dynamic program in PARI/GP with sets (subset sum with knowing all possible subset sizes):
https://www.mersenneforum.org/node/1055343?p=1062012#post1062012 And how fast GP is.The gist is my forst ever code with 25 nester for loops on variables a..y, more info:
https://www.mersenneforum.org/node/1055343?p=1062097#post1062097 pi@raspberrypi5:~/PrimeSquares $ time gp -q < sum25f.gp {[3,5,7,11,17; 67,41,43,13,47; 37,53,19,59,113; 31,23,71,61,97; 29,89,83,79,73];} real 0m0.031s user 0m0.028s sys 0m0.004s pi@raspberrypi5:~/PrimeSquares $ pi@raspberrypi5:~/PrimeSquares $ cat > 1171.gp {[3,5,7,11,17; 67,41,43,13,47; 37,53,19,59,113; 31,23,71,61,97; 29,89,83,79,73];} pi@raspberrypi5:~/PrimeSquares $ ps=1171.gp gp -q < validate.gp 1171.gp, sum: 1171, validated pi@raspberrypi5:~/PrimeSquares $ Regards, Hermann.