A single-linked list (functional idea) implemented by F #

Learn more about F # on http://fsharp.net//See the F # Tutorials project for more help. Type list =     | Nil     | Cons of int * Listlet x = Cons (1, Cons (2, Cons (3, Cons (4, Nil)))//let rec printlist l=//    match L with//    | Nil---()//    | Cons (A, l ') printfn "%d" A; Printlist l '//print program, can be achieved by providing different function f for different printing modes let rec printlist l f=    match L with    | Nil-and ()    | Cons (A, L ')    (if f a then printfn "%d" a else ()); Printlist l ' f) [<entrypoint>]let main argv =     print List x (fun x-> true)    printlist x (fun x-x>2)    System.Console.ReadLine ()    0//return integer exit code

　　

A single-linked list (functional idea) implemented by F #