Dan Lentz danlentz

TriG EBNF

[1] TriGDoc	::=	ws* (statement ws*)*
[2] statement	::=	directive ws* '.' | graph
[3] graph	        ::=	graphName? ws* '='? ws* '{' ws* (triples ws* ('.' ws* triples ws*)* '.'? ws*)? '}' ws* '.'?
[4] graphName	::=	resource

All other grammar terms are defined by the Turtle grammar as of 2006/12/04.

You can use snippet markers within your HTML template code in order to generate *-prefixed selectors that you can later use within Enlive template.

For example, if you say:

<div snippet="content-main"></div>

You can later reference it with *content-main selector, which will be automatically generated for you.

Finding Paths

Our example graph consists of movies with title and year and actors with a name. Actors have ACTS_IN relationships to movies, which represents the role they played. This relationship also has a role attribute.

We queried and updated the data so far, now let’s find interesting constellations, a.k.a. paths.

	(defmacro extend-fn [name args & body]
	`(let [old-fn# (var-get (var ~name))
	new-fn# (fn [& p#]
	(let [~args p#]
	(do ~@body)))
	wrapper# (fn [& params#]
	(if (= ~(count args) (count params#))
	(apply new-fn# params#)
	(apply old-fn# params#)))]
	(alter-var-root (var ~name) (constantly wrapper#))))

	(defprotocol Hexl
	(hexl-hex [val])
	(hexl-char [char]))

	(extend-type Number
	Hexl
	(hexl-hex [i]
	(let [rtnval (Integer/toHexString (if (< i 0) (+ 256 i) i)) ]
	(if (< (count rtnval) 2) (str "0" rtnval) rtnval)))
	(hexl-char [b]

	(defprotocol Hexl
	(hexl-hex [val])
	(hexl-char [char]))

	(extend-type Number
	Hexl
	(hexl-hex [i]
	(let [rtnval (Integer/toHexString (if (< i 0) (+ 256 i) i)) ]
	(if (< (count rtnval) 2) (str "0" rtnval) rtnval)))
	(hexl-char [b]

	#!/usr/local/bin/sbcl --script

	(let ((quicklisp-init (merge-pathnames "quicklisp/setup.lisp"
	(user-homedir-pathname))))
	(when (probe-file quicklisp-init)
	(load quicklisp-init)))
	(ql:quickload "cl-fad" :verbose nil :explain nil :prompt nil)

	(destructuring-bind (header footer &rest files)
	(loop for arg in (cdr sb-ext:posix-argv)

	The following prefixes are automatically included for all repositories. Any values you specify above will overwrite these defaults.

	PREFIX cc: <http://creativecommons.org/ns#>
	PREFIX cert: <http://www.w3.org/ns/auth/cert#>
	PREFIX dbp: <http://dbpedia.org/property/>
	PREFIX dc: <http://purl.org/dc/terms/>
	PREFIX dc11: <http://purl.org/dc/elements/1.1/>
	PREFIX dcterms: <http://purl.org/dc/terms/>
	PREFIX doap: <http://usefulinc.com/ns/doap#>
	PREFIX exif: <http://www.w3.org/2003/12/exif/ns#>

	;; That will actually catch exception within inner thread, too. And within inner thread of inner thread. Etc.
	(Thread/setDefaultUncaughtExceptionHandler (proxy [Thread$UncaughtExceptionHandler] []
	(uncaughtException [t e]
	;;
	;; Your fancy Exception logging here
	;;
	(println "Throwable: " + (.getMessage e))
	(println (.toString t)))))
	(.start (Thread. (cast Runnable
	(fn []


	/********************
	* TOOLTIP CSS
	*/

	.nvtooltip {
	position: absolute;
	background-color: rgba(255,255,255,1);
	padding: 10px;
	border: 1px solid #ddd;