Permalink
Browse files

Cleanup

  • Loading branch information...
1 parent 50afc72 commit fce695ae7d1a8b7ce78eecca3ef05170554f0213 @forki committed Feb 14, 2011
Binary file not shown.
@@ -19,9 +19,7 @@ type Category =
| Yahtzee
| Chance
-let toList (roll:Roll) =
- let a,b,c,d,e = roll
- [a;b;c;d;e]
+let toList (a,b,c,d,e) = [a;b;c;d;e]
let sumNumber number =
Seq.filter ((=) number)
@@ -1,4 +1,4 @@
-module Spec.OrderProcOrderProcessingSpec
+module Spec.OrderProcessingSpec
open System
open NaturalSpec

0 comments on commit fce695a

Please sign in to comment.