f# second session

apiary.fsx

open ApiaryProvider

let mdb = new ApiaryProvider<"themoviedb">("http://api.themoviedb.org")
mdb.AddQueryParam("api_key", ApiKey)

let query = "query", "craig"
let res = mdb.Search.Person(query=[query])

let totalPages = res.TotalPages

let pages = 
    seq { 1 .. totalPages }
    |> Seq.map (fun x -> mdb.Search.AsyncPerson(query=[query; "page", x.ToString()]))
    |> Async.Parallel
    |> Async.RunSynchronously

let results = pages |> Array.collect(fun rs -> rs.Results)

let pop = results |> Seq.sortBy (fun x -> x.JsonValue)

let fi = res.Results |> Seq.filter(fun p -> p.Name.Contains("Daniel"))

let h = results |> Seq.head

printfn "%A" h.JsonValue