; coprime numbers
(define (f lo hi)
(cond ((and (even? lo) (< 1 (- hi lo)))
(list lo (+ lo 1) (+ lo 2)))
((and (odd? lo) (< 2 (- hi lo)))
(list (+ lo 1) (+ lo 2) (+ lo 3)))
(else "No solution")))
(display (f 2 4)) (newline)
(display (f 10 11)) (newline)
(display (f 900000000000000009 900000000000000029)) (newline)
OyBjb3ByaW1lIG51bWJlcnMKCihkZWZpbmUgKGYgbG8gaGkpCiAgKGNvbmQgKChhbmQgKGV2ZW4/IGxvKSAoPCAxICgtIGhpIGxvKSkpCiAgICAgICAgICAobGlzdCBsbyAoKyBsbyAxKSAoKyBsbyAyKSkpCiAgICAgICAgKChhbmQgKG9kZD8gbG8pICg8IDIgKC0gaGkgbG8pKSkKICAgICAgICAgIChsaXN0ICgrIGxvIDEpICgrIGxvIDIpICgrIGxvIDMpKSkKICAgICAgICAoZWxzZSAiTm8gc29sdXRpb24iKSkpCgooZGlzcGxheSAoZiAyIDQpKSAobmV3bGluZSkKKGRpc3BsYXkgKGYgMTAgMTEpKSAobmV3bGluZSkKKGRpc3BsYXkgKGYgOTAwMDAwMDAwMDAwMDAwMDA5IDkwMDAwMDAwMDAwMDAwMDAyOSkpIChuZXdsaW5lKQ==