staafl · February 12, 2014 08:54
diff --git a/gistfile1.fs b/gistfile1.fs
 > let rec gcd = function
 -   | a 0 -> a
 -   | a b -> gcd b (a % b);;

    | a 0 -> a
  ----^

 stdin(29,5): error FS0039: The pattern discriminator 'a' is not defined
	> let rec gcd = function
	- \| a 0 -> a
	- \| a b -> gcd b (a % b);;

	\| a 0 -> a
	----^

	stdin(29,5): error FS0039: The pattern discriminator 'a' is not defined