Alexandr Pantyuhov / alwx@alwx.me
[entity attribute value t ]
...
[ 100 :person/name "Alexandr" 102 ]
[ 101 :lecture/title "Datomic" 102 ]
[ 101 :lecture/year 2013 102 ]
[ 101 :lecture/author 100 102 ]
...
[:find ?e
:where
[?e :person/name "Alexandr" _]]
[:find ?title
:where
[?e :lecture/year 2013]
[?e :lecture/title ?title]]
[:find ?title
:in $ [?director ?actor]
:where
[?d :person/name ?director]
[?a :person/name ?actor]
[?m :movie/director ?d]
[?m :movie/cast ?a]
[?m :movie/title ?title]]
[:find ?name
:where
[?p :person/name ?name]
[(.startsWith ?name "M")]]