// #r "System.Xml.Linq.dll"

open System.Linq
open System.Xml.XPath
open System.Xml.Linq

[<EntryPoint>]
let main argv =
    let xn s = XName.Get(s)
    let doc = XDocument.Load("MusicLibrary.xml")
    seq { for cd in doc.Element(xn"musicLibrary").Elements(xn"cd") do
          if cd.Element(xn"year").Value = "1994" then
              yield cd.Element(xn"title"), cd.Element(xn"artist") }
    |> Seq.iter (fun (ttl, art) ->
         printfn "The title='%s'"  ttl.Value
         printfn "The artist='%s'" art.Value)
    0