fork download
copy 
  1. x :: (Eq a, Floating a) => a -> a
  2. x 0 = 2
  3. x n = atan (1/(x(n-1)))
  4. main = print $ x 40
Success #stdin #stdout 0s 4512KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
0.8603335892006415
https://ideone.com/ssxg6I
language:
Haskell (ghc 8.4.4)
created:
3 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

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