RosettaCodeData/Task/Parallel-calculations/Common-Lisp/parallel-calculations-2.lisp

CL-USER> (print-max-factor (max-minimum-factor '(12757923 12878611 12878893 12757923 15808973 15780709 197622519)))
12878893 has the largest minimum factor 47
Initial data commit 2023-07-01 11:58:00 -04:00			`CL-USER> (print-max-factor (max-minimum-factor '(12757923 12878611 12878893 12757923 15808973 15780709 197622519)))`
			`12878893 has the largest minimum factor 47`