declare function local:get_emps() {
   for $r in doc("v-emps.xml")/employees/employee
     let $n:=$r/salary[xs:date(@tstart) <= xs:date("1995-05-06") and xs:date(@tend) >= xs:date("1995-05-06")]
     where xs:integer($n) <= xs:integer(45000)
   return (element emp{$n, $r/firstname})
   };
   
   let $r := local:get_emps()
   return (element result{$r})