Ideone.com

fork download

copy

let uncurry f (x, y) = f x y
let k x y = x
let k' x y = y
 
let fst<'a,'b> = uncurry k
let snd<'a,'b> = uncurry k'

Success #stdin #stdout 0.02s 13572KB

stdin

copy

Standard input is empty

stdout

copy

Standard output is empty

https://ideone.com/BTPnOA

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!