9 people like it.

tutorial, test, tennis, clarity, simplicity in f#

f# short and sweet may help beginners. Score on winning a point, Winning number first and other players is labeled: b example "0",b ->"15", b. A special case of draw-deuce is "40", "A" -> "40","40" If player 2 wins a point score calling is flipped as 2->score(b,a). fold (fun to call for each element in the test list) (initials "0","0") [test list of winning player] Notice f# is perhaps easier and clearer than pseudo code and verbose description. An improvement suggestion for Don is if syntax is not confused can word function be made optional so = |... or -> |.. so syntax is ever more clearer? 

1: 
2: 
3: 
4: 
5: 

let score=function "0",b->"15",b|"15",b->"30",b|"30",b->"40",b|"40","A"->"40","40"|"40",b->"A",b|_,b->"Win",b

List.scan (fun (a,b)->function 2->score(b,a) |_->score(a,b))  ("0","0")  [1;2;1;1;1;2;1;1;1;1]

//Musa.Jahanaghir@Live.com
val score : string * string -> string * string

Full name: Script.score
val b : string
Multiple items
module List

from Microsoft.FSharp.Collections

--------------------
type List<'T> =
  | ( [] )
  | ( :: ) of Head: 'T * Tail: 'T list
  interface IEnumerable
  interface IEnumerable<'T>
  member GetSlice : startIndex:int option * endIndex:int option -> 'T list
  member Head : 'T
  member IsEmpty : bool
  member Item : index:int -> 'T with get
  member Length : int
  member Tail : 'T list
  static member Cons : head:'T * tail:'T list -> 'T list
  static member Empty : 'T list

Full name: Microsoft.FSharp.Collections.List<_>
val scan : folder:('State -> 'T -> 'State) -> state:'State -> list:'T list -> 'State list

Full name: Microsoft.FSharp.Collections.List.scan
val a : string

More information

Link:http://fssnip.net/7TS
Posted:7 years ago
Author:Musa Jahanghir
Tags: tennis; sample; functional data; kata , test , tutorial

This web site is created using F# and Suave web server. It is hosted on Azure and the source code is on GitHub. Contributions are welcome!

The first version of fssnip.net has been created by @tomaspetricek back in 2010. This web site is a new, open-source and contribution-friendly version.