           ;;)))
             [:div 
              [:p [:b "Language: "] language]
+             [:p [:b "File vlcl-lst:    "] [:pre req-vlcllst]]
              [:p [:b "File vlcl-list:    "] [:pre req-vlcllist]]
-             ;;[:p [:b "req-vlcllist:    "] [:pre req-vlcllist]]
              [:p [:b "File data-vlcl:     "] [:br] req-dataIDvlcl]
              [:p [:b "File vlcl-data:     "] [:br] req-vlcldataID]
              [:p [:b "POS: " ] pos]

(ns webapp.routes.listvlcl
 (:refer-clojure :exclude [filter concat group-by max min  replace])
  (:require [compojure.core :refer :all]
            [webapp.views.layout :as layout]
            [webapp.models.sparql :as sparql]

                          (req2vlist1 req2-body)
                          (= pos "pro")
                          ;;(rest req2-body)
                          (req2vlist2 req2-body)
                          ;; listvlclplex.clj has req2vlist2, investigate
                          :else (req2vlist3 req2-body))
              req3-out (apply str req2-out)
              req4-out (if (re-find #"\w" req3-out)
                         (replace req3-out #"^\s*\n" "")
