BachoSeven/labLPL
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

esperimenti

Browse Source
This commit is contained in:
BachoSeven
2022-05-04 22:37:15 +02:00
parent 777133c94a
commit 0cebe973a5
1 changed files with 3 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
esperimenti/Program.fs
+3
View File
@@ -21,3 +21,6 @@ printfn "%b" (isPippo(numOfStringsContainingAs [|"a";"a";"a";"a"|] |> numeroPipp
printfn "%b" (isPippo(numOfStringsContainingAs [|"a";"a";"a"|] |> numeroPippo)) printfn "%b" (isPippo(numOfStringsContainingAs [|"a";"a";"a"|] |> numeroPippo))
printfn "%b" (isPippo(parolaPippo("pipo"))) printfn "%b" (isPippo(parolaPippo("pipo")))
printfn "%b" (isPippo(parolaPippo("pippo"))) printfn "%b" (isPippo(parolaPippo("pippo")))
let s = Seq.initInfinite (fun s -> s*s)
Seq.toList (Seq.take 10 s)