Rosetta Code

Go Fish/OCaml: Difference between revisions

Page Discussion

Go Fish/OCaml (view source)

Revision as of 01:17, 30 August 2010

2 bytes added ,  13 years ago
m
broke line too long
No edit summary
m (broke line too long)
Line 38:
let pip_of_card (pip, _) = (pip)
 
let deck =
let deck = List.concat (List.map (fun pip -> List.map (fun suit -> (pip, suit)) suits) pips)
 
 
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/134933"