Ideone.com

fork download

copy

fusc' 0=(1,0)
fusc' n
    |even n=(a+b, b)
    |odd n=(a,a+b)
    where
    (a,b)=fusc' $n`div`2
fusc =fst.fusc'
main=
problem_169=fusc (10^25)

Compilation error #stdin compilation error #stdout 0s 0KB

stdin

copy

Standard input is empty

compilation info

[1 of 1] Compiling Main             ( prog.hs, prog.o )

prog.hs:9:1: error:
    parse error (possibly incorrect indentation or mismatched brackets)

stdout

copy

Standard output is empty

https://ideone.com/2Gmar6

language:

Haskell (ghc 8.4.4)

created:

visibility:

public

Share or Embed source code

The brand new service which powers Ideone!

Widget for compiling and running the source code in a web browser!