Exercism Scala track with difficulties mapped from F# track

ScalaDifficulties.fsx

#r "../packages/FSharp.Data.2.3.2/lib/net40/FSharp.Data.dll"

open FSharp.Data

type configJson = JsonProvider<"https://raw.githubusercontent.com/exercism/xscala/master/config.json">

let scalaConfigJson = configJson.Load("https://raw.githubusercontent.com/exercism/xscala/master/config.json")
let fsharpConfigJson = configJson.Load("https://raw.githubusercontent.com/exercism/xfsharp/master/config.json")

let fsharpExerciseDifficulties =
    fsharpConfigJson.Exercises
    |> Array.map (fun x -> (x.Slug, x.Difficulty))
    |> Map.ofArray

let scalaExercises =
    scalaConfigJson.Exercises
    |> Array.map (fun x -> (x.Slug, Map.find x.Slug fsharpExerciseDifficulties))
    |> Array.iter (fun (slug, difficulty) -> printfn "- %s: %i" slug difficulty)