anchor.diff:            (head (make-token-id id (slot-value tk 'head)))
             (deprel (slot-value tk 'deprel))
             (deps (slot-value tk 'deps))
  -          (misc (slot-value tk 'misc)))
  +          (misc (make-features-bnode (slot-value tk 'misc) t)))
         (format stream "conll:~a a conll:Token .~%" tid)
         (format stream "conll:~a conll:sentence conll:~a .~%" tid id)
   
  
positive.code:             (split-sequence #\| features :remove-empty-subseqs t))
        s)))
  
  (defun make-features-bnode (features &optional (value-as-literal nil))
    (unless (unspecified-field? features)
      (format nil "~{ ~a~^;~}" 
              (mapcar (lambda (f)
                        (destructuring-bind (name value)
  			  (split-sequence #\= f :count 2)
                          (if value-as-literal
                              (format nil "~a ~a" (make-featurename name) (make-literal value))
                              (format nil "~a conll:~a" (make-featurename name) value)))) 
                      (split-sequence #\| features :remove-empty-subseqs t)))))
  
  (defun convert-sentence-to-turtle (stream conll text id)
    (format stream "conll:root a conll:DepRel .~%")
  
negative.code:             (format stream "~a rdfs:label ~a .~%" (make-dep deprel) (make-literal deprel))
              (format stream "conll:~a ~a conll:~a .~%" tid (make-dep deprel) head)
              (format stream "conll:~a ~a conll:~a .~%" tid (make-dep deprel) head))))))
  
  
  (defun convert-rdf (corpusname stream conlls text-fn id-fn)
    "Converts the collection of sentences (as generated by READ-CONLLU)
  