Query McIntire audio recordings to identify duplicates based on recording date

identify-duplicates.xqy

xquery version "1.0-ml"; (: Delete/change XQuery version declaration if not a MarkLogic user :)

import module namespace functx = "http://www.functx.com" at "/MarkLogic/functx/functx-1.0-nodoc-2007-01.xqy";
declare namespace ia = "http://digital.library.ptsem.edu/ia";


let $rec-dates := 
  for $doc in collection("media-available")
  let $title := $doc/ia:doc/ia:metadata/ia:title
  let $rec-date := $doc/ia:doc/ia:metadata/ia:recordingDate
  where contains($title, "Twentieth Century Reformation Hour")
  return $rec-date
return for $dup in functx:non-distinct-values($rec-dates)
       order by $dup
       return string($dup)