Home
Insert
Update snippet 'Function to generate circular infinite sequence from a list'
Title
Description
Function to generate circular infinite sequence from a list
Source code
open System open System.IO let generateCircularSeq (lst:'a list) = let rec next () = seq { for element in lst do yield element yield! next() } next() for i in [1;2;3;4;5;6;7;8;9;10] |> generateCircularSeq |> Seq.take 12 do i |> Console.WriteLine
Tags
sequence
seq
sequence
seq
Author
Link
Reference NuGet packages
If your snippet has external dependencies, enter the names of NuGet packages to reference, separated by a comma (
#r
directives are not required).
Update