gistfile1.txt

(query-exec (sqldb-param)
	    (prepared (string* "INSERT OR REPLACE INTO TagCardinalities (a,b,cardinality)"
				" SELECT min($1,t.tag_id),max($1,t.tag_id),ifnull(sub.cnt,0) "
				" FROM  Tags t LEFT JOIN"
				"(SELECT tag_id, COUNT(*) as cnt FROM FileTags WHERE file_id IN "
				"(SELECT file_id  FROM FileTags WHERE tag_id=$1)"
				"GROUP BY tag_id) AS sub"
				"ON t.tag_id = sub.tag_id"))
	    a-id)))