:- use_module(library(dom)).
:- use_module(library(js)).
my_function :-
	write('Hello from Prolog'),
	get_by_id(example, Example),
	write('get_by_id returned ok'),
	% write(Example), nl,
	( prop(Example, getContext, GetContext) ->
		write('prop succeeded')
	;
		write('prop failed')
	),
 	apply(GetContext, ['2d'], Context),
 	write('getContext returned ok').
% 	prop(Context, fillStyle, FillStyle),
% 	apply(FillStyle, ['red'], _),
% 	write('fillStyle returned ok'), nl,
% 	prop(Context, fillRect, FillRect),
% 	apply(FillRect, [30, 30, 50, 50], _),
% 	write('fillRect returned ok'), nl.