All pastes #2106952 Raw Edit

Miscellany

public text v1 · immutable
#2106952 ·published 2012-01-28 04:25 UTC
rendered paste body
pal n = x == reverse x where x = show n
main = print $ head $ filter pal [i*k | i <- [999,998..], k <- [999,998..]]