fork download 
  1. let f = function
  2.     | 0 , 0 , 0 -> 0
  3.     | 0 , 1 , 1 -> 0
  4.     | 1 , 0 , 1 -> 0
  5.     | 1 , 1 , 0 -> 0
  6.     | _         -> 1
  7.  
  8. for a in 0..1 do
  9.     for b in 0..1 do
  10.         for c in 0..1 do
  11.             printfn "%i xor %i xor %i = %i" a b c (f (a, b, c))
  12.  
Success #stdin #stdout 0.08s 24744KB
comments (?)
stdin 
Standard input is empty
stdout 
0 xor 0 xor 0 = 0
0 xor 0 xor 1 = 1
0 xor 1 xor 0 = 1
0 xor 1 xor 1 = 0
1 xor 0 xor 0 = 1
1 xor 0 xor 1 = 0
1 xor 1 xor 0 = 0
1 xor 1 xor 1 = 1
https://ideone.com/njLdnB
language:
F# (mono 4.1)
created:
10 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!