Ideone.com

fork download

let rec ping x = if x > 0 then pong (x - 1) else "ping"
and     pong x = if x > 0 then ping (x - 1) else "pong"
 
do
    printfn "%s" <| ping 1000000

Success #stdin #stdout 0.06s 24616KB

stdin

Standard input is empty

stdout

ping

https://ideone.com/1bYwgG

language:

F# (mono 4.1)

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!