esperimenti

2022-05-04 22:37:15 +02:00
parent 777133c94a
commit 0cebe973a5
1 changed files with 3 additions and 0 deletions
@@ -21,3 +21,6 @@ printfn "%b" (isPippo(numOfStringsContainingAs [|"a";"a";"a";"a"|] |> numeroPipp
 printfn "%b" (isPippo(numOfStringsContainingAs [|"a";"a";"a"|] |> numeroPippo))
 printfn "%b" (isPippo(parolaPippo("pipo")))
 printfn "%b" (isPippo(parolaPippo("pippo")))
+
+let s = Seq.initInfinite (fun s -> s*s)
+Seq.toList (Seq.take 10 s)