taxonomy_test.xqm

module namespace _ = "http://acdh.oeaw.ac.at/vicav-wibarab";
import module namespace vicav = 'http://acdh.oeaw.ac.at/vicav' at 'vicav.xqm';
import module namespace cors = 'https://www.oeaw.ac.at/acdh/tools/vle/cors' at 'cors.xqm';
import module namespace api-problem = "https://tools.ietf.org/html/rfc7807" at "api-problem.xqm";
declare namespace tei="http://www.tei-c.org/ns/1.0";
declare
   %rest:path('/vicav/taxonomy.json')
   %rest:produces("application/json")
   %rest:GET
 function _:taxonomy(){
 api-problem:or_result (prof:current-ns(),
    _:_taxonomy#0, [], map:merge((cors:header(()), map{'Content-Type': 'application/json;charset=UTF-8'}))
  )
};

declare function _:_taxonomy(){
  serialize(<json type="object">{vicav:get_taxonomy()}</json>, map { "method": "json", "indent": "yes" })
};