How do people run simple timing tests in Ciao? In SWI-Prolog I can do the following:<div><br></div><div><div><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">benchmark1 :-</font></div><div><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">�� flag(benchmark,_,0),</font></div>
<div><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">�� repeat,</font></div><div><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">�� zebra1(Houses, WaterDrinker, ZebraOwner),</font></div>
<div><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">�� flag(benchmark,N,N+1),</font></div><div><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">�� N = 1000,</font></div><div><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">�� !.</font></div>
<div><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">benchmark :- time(benchmark1).</font></div></div><div><br></div><div>What is the equivalent in Ciao?</div><div><br></div><div>Thanks!</div><div>David</div>
<div><br></div>