F# code sample comparion to ocaml

FsharpSampleFile.fsx

open System

module Test = 

    let hello world = 
        "hello " + world

let lst =  
    [
        "world"
        "john"
        "BUG"
        "mary"
    ]
    |> Seq.filter (fun x -> x <> "BUG")
    |> Seq.map Test.hello 
    |> Seq.toList

lst |> Seq.iter (printfn "%s")

lst 
|> Seq.reduce (fun x y -> x + "," + y)
|> printfn "%s"