1:- module(dss_localview, []). 2:- use_module(cliopatria(hooks)). 3:- use_module(library(semweb/rdf_db)). 4:- use_module(library(http/html_write)). 5:- use_module(library(http/html_head)). 6
7
8cliopatria:list_resource(URI, _Options) -->
9 { rdf(_, schema:image, URI), !
10 },
11 html_requires(css('dss.css')),
12 html(img([class(example), src(URI)])).
13cliopatria:list_resource(URI, _Options) -->
14 { file_name_extension(_Base, Img, URI),
15 image_extension(Img)
16 },
17 html_requires(css('dss.css')),
18 html([ h2([ 'Resource: ', a(href(URI), URI)]),
19 img([class(monsterrol), src(URI)])
20 ]).
21cliopatria:list_resource(URI, _Options) -->
22 { atom_concat(Base, ':ocr', URI)
23 },
24 html_requires(css('dss.css')),
25 html([ h2([ 'Resource: ', a(href(URI), URI)]),
26 iframe([class('kb-artikel'), src(Base)], [])
27 ]).
28
29image_extension(jpg).
30image_extension(jpeg)