       [:dc:title title]
       [:dc:type type]
       [:ncc:charset "utf-8"]
-      [:ncc:depth (depth production)]
-      [:ncc:files (files production)]
+      [:ncc:depth depth]
+      [:ncc:files files]
       (when footnotes [:ncc:footnotes footnotes])
-      [:ncc:kByteSize (size production)]
+      [:ncc:kByteSize size]
       [:ncc:multimediaType multimediaType]
       [:ncc:narrator narrator]
-      [:ncc:pageFront (page-front production)]
-      [:ncc:pageNormal (page-normal production)]
-      [:ncc:pageSpecial (page-special production)]
+      [:ncc:pageFront page-front]
+      [:ncc:pageNormal page-normal]
+      [:ncc:pageSpecial page-special]
       (when prodnotes [:ncc:prodNotes prodnotes])
       [:ncc:producedDate producedDate]
       [:ncc:revisionDate revisionDate]
       (when multi-volume
-        [:ncc:setInfo (str (:number multi-volume)) " of " (:total multi-volume)])
+        [:ncc:setInfo (str (:number multi-volume) " of " (:total multi-volume))])
       (when sidebars [:ncc:sidebars sidebars])
       [:ncc:sourceDate sourceDate]
       [:ncc:sourcePublisher sourcePublisher]

(defn- page-normal [production] 0)
(defn- page-special [production] 0)

(defn- rdf-sexp [production]
  (let [{:keys [title creator subject description publisher date identifier source language rights 
                sourceDate sourceEdition sourcePublisher sourceRights sourceTitle
                multimediaType multimediaContent narrator producedDate 
                revision revisionDate revisionDescription
                totalTime audioFormat type
                footnotes prodnotes multi-volume sidebars
                tocItems]} production]
    [:rdf:DRF {:xmlns:rdf "http://www.w3.org/1999/02/22-rdf-syntax-ns#"
               :xmlns:dc "http://purl.org/dc/elements/1.1/"
               :xmlns:ncc "http://www.daisy.org/publications/specifications/"

      [:sbs:kostenstelle "FIXME:"]
      [:sbs:printPageNumber "FIXME:"]]]))

(defn rdf
  "Create rdf for a given production"
  [production]
  (-> production
      get-meta-data
      rdf-sexp
      xml/sexp-as-element
      xml/emit-str))
