(load "euler.lisp")

(defun set-of-concatenatable-primes (list)
)

(defun solution ()
  (combinations 5 (eratosthenes 30000))
)