>>800 以下の組込述語を使います。ここでは10000に変更しましたが、初期値はmax_depth(10)になっています。

?- set_prolog_flag(answer_write_options,[quoted(true),portray(true),max_depth(10000),spacing(next_argument)]).