fork download
copy 
  1. let rec gcd a b =
  2.     if b = 0 then a
  3.     else
  4.        gcd b (a % b)
  5.  
  6. let f a b = 
  7.     printfn "gcd(%d,%d) = %d" a b (gcd a b)
  8. f 10 9
  9. f (13*61*2*2*2*3) (13*2*3*5*7)
  10. f -10 12345
stdin
copy 
Standard input is empty
compilation info 
Microsoft (R) F# 2.0 Compiler build 2.0.0.0
Copyright (c) Microsoft Corporation. All Rights Reserved.
stdout
copy 
gcd(10,9) = 1
gcd(19032,2730) = 78
gcd(-10,12345) = 5
https://ideone.com/hHN7j
language:
F# (mono 4.1)
created:
13 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!