projects
/
fsharp-ref.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Update samples.
[fsharp-ref.git]
/
FSharpRef
/
Main.fs
diff --git
a/FSharpRef/Main.fs
b/FSharpRef/Main.fs
index
d070829
..
33fc574
100644
(file)
--- a/
FSharpRef/Main.fs
+++ b/
FSharpRef/Main.fs
@@
-3,6
+3,9
@@
open System.Linq
open Functional
open System.Linq
open Functional
+// For dynamic typing. To print anything in our case.
+let inline print a = printfn "%A" a
+
[<EntryPoint>]
let main args =
appendFile "test.txt" "Pouet"
[<EntryPoint>]
let main args =
appendFile "test.txt" "Pouet"
@@
-11,8
+14,9
@@
let main args =
print (isEven (fac 4))
//
print steve.First
print (isEven (fac 4))
//
print steve.First
+ printfn "Person equality: %A" ({ First = "Steve"; Last = "Holt"; Age = 42 } = steve)
printfn "Young persons: "
printfn "Young persons: "
- (youngPersonNames (Queryable.AsQueryable [steve ; steves
't
win ; { First = "Paul"; Last = "Atreides"; Age = 11 }])) |> Seq.iter (fun name -> printfn " name: %s" name)
+ (youngPersonNames (Queryable.AsQueryable [steve ; steves
T
win ; { First = "Paul"; Last = "Atreides"; Age = 11 }])) |> Seq.iter (fun name -> printfn " name: %s" name)
//
print <| Seq.take 10 allPositiveInts
print <| Seq.take 10 (fibs 1 1)
//
print <| Seq.take 10 allPositiveInts
print <| Seq.take 10 (fibs 1 1)