Press CTRL+C or CMD+C to copy the selected text and close this dialog.
3 people like it.
Like the snippet!
Project Euler Problem 14
Seq.init 999999 (fun i -> Seq.unfold (fun i -> if (i > 1L) then Some(i, if i % 2L = 0L then i / 2L else i * 3L + 1L) else None) (int64(i))) |> Seq.sortBy (fun x -> -(Seq.length x) - 1) |> Seq.head |> Seq.head
This web site is created using F# and Suave web server. It is hosted on
Azure and the source code is on GitHub. Contributions
The first version of fssnip.net has been created by
@tomaspetricek back in 2010.
This web site is a new, open-source and contribution-friendly version.