hello :-
write("<HTML>
<HEAD>
<TITLE>Hello from Prolog</TITLE>
</HEAD>
<BODY>
<H1>Hello from Prolog</H1>
</BODY>
</HTML>
").

:- hello, halt.
