Sample F# File

// Sample F# script — samplefiles.com
type Customer = { Id: int; Name: string; Balance: decimal }

let isVip c = c.Balance >= 10_000m
let totalBalance = List.sumBy (fun c -> c.Balance)

let customers =
    [ { Id = 1; Name = "Ada"; Balance = 12_500m }
      { Id = 2; Name = "Grace"; Balance = 830.5m }
      { Id = 3; Name = "Linus"; Balance = 10_000m } ]

for c in customers do
    printfn "%-6s %10.2f %s" c.Name c.Balance (if isVip c then "VIP" else "")

printfn "Total: %.2f" (totalBalance customers)