1 2 3 4 5 6 7 8 9 10 11 12 13 14
namespace MathService module MyMath = let private square x = x * x let private isOdd x = x % 2 <> 0 let squaresOfOdds xs = xs |> Seq.filter isOdd |> Seq.map square module Say = let hello name = printfn "Hello %s" name