giles 4e6a345342 ocaml: phase 5.1 euler34_small.ml baseline (factorions <= 2000 = 145) ...

Number that equals the sum of factorials of its digits:
  145 = 1! + 4! + 5! = 1 + 24 + 120

Implementation:
  fact n           iterative factorial
  digit_fact_sum n walk digits, sum fact(digit)
  euler34 limit    scan 3..limit, accumulate matches

The only other factorion is 40585 = 4!+0!+5!+8!+5!. Real PE34 sums
both (= 40730); 2000 keeps under our search budget.

121 baseline programs total.

2026-05-09 23:50:25 +00:00

2.7 KiB

Raw Blame History

View Raw