Single Feature

Single-Feature.xq

let $uri := fn:encode-for-uri( "http://bioimages.vanderbilt.edu/vanderbilt/7-314#2002-06-14")
let $json := fetch:text("http://api.gbif.org/v1/occurrence/search?occurrenceID=" || $uri)
let $json := fn:parse-json($json)
let $latitude := $json?results?1?decimalLatitude
let $longitude := $json?results?1?decimalLongitude
let $identifier := $json?results?1?identifier
return map {
  "type": "Feature",
  "geometry": map {
    "type": "Point",
    "coordinates": [$longitude, $latitude]
  },
  "properties": map {
    "name": $identifier
  }
}