davidgrenier · July 28, 2013 01:55
diff --git a/GenString.fsx b/GenString.fsx
 let genString =
    let rand = System.Random()
    let chars = [|'A'..'Z'|] |> Array.append [|'a'..'z'|]
    fun n -> System.String (Array.init n (fun _ -> chars.[rand.Next(0, chars.Length)]))

 genString 10
	let genString =
	let rand = System.Random()
	let chars = [\|'A'..'Z'\|] \|> Array.append [\|'a'..'z'\|]
	fun n -> System.String (Array.init n (fun _ -> chars.[rand.Next(0, chars.Length)]))

	genString 10