<< canopy ( , ), . , , - ( )
let randomNumString n = genRandomNumbers n |> List.map string |> List.reduce (+)
, , .
let randomNumString n = genRandomNumbers n
|> List.fold (fun acc i -> acc + (string i)) ""
let rand = new System.Random()
let genRandomNumbers count = List.init count (fun _ -> rand.Next())
let randomNumString n = genRandomNumbers n |> List.map string |> List.reduce (+)
"#CompanyName" << (randomNumString 1)
, F # . << , - . , .