You can do (note that Reply is not passed out any more):
compute_reply(File,Test) :-
['planner.pl'],
output_html([ --, 'The result is ' ]),
test1,
output_html([ '.',\]).
i.e., write directly to user_output. Depending on what test1 prints
you may need to do something more to get it to format nicely.
--
-----------------------------------------------------------------------------
herme(a)fi.upm.es | Manuel Hermenegildo
+34-91-336-7435 (Work) | Facultad de Informatica, UPM
+34-91-352-4819 or 336-7412 (FAX) | Universidad Politecnica de Madrid
http://www.clip.dia.fi.upm.es/~herme | 28660-Boadilla del Monte, MADRID SPAIN
-----------------------------------------------------------------------------