deneuxj

open System

(* Low-level F# implementation *)
let newRandomChar getRandomInt (chars : char[]) =
    let idx = getRandomInt()
    chars.[idx]

let newRandomWord (getRandomChar : unit -> char) length =
    let chars =
        Array.init length (fun _ -> getRandomChar())

dmohl

#r "FSharp.Data.TypeProviders"
#r "System.Data.Services.Client"
open Microsoft.FSharp.Data.TypeProviders

[<Generate>] // Only needed for the Developer Preview (this will be dropped before the official release of F# 3.0)
type stackoverflow = 
    ODataService<ServiceUri = @"http://data.stackexchange.com/stackoverflow/atom"> 
let dataContext = stackoverflow.GetDataContext()

query {