Isqrt (integer square root) of X: Difference between revisions

Content added Content deleted
Line 3,218: Line 3,218:


{{out}}
{{out}}
<pre style="height:30em;overflow:auto">$ maxima -q -b isqrt.mac
<pre style="height:30em;overflow:auto">$ maxima -b isqrt.mac
Maxima 5.46.0 https://maxima.sourceforge.io
using Lisp SBCL 2.2.3
Distributed under the GNU Public License. See the file COPYING.
Dedicated to the memory of William Schelter.
The function bug_report() provides bug reporting information.
(%i1) batch("isqrt.mac")
(%i1) batch("isqrt.mac")


Line 3,557: Line 3,562:


(%o6) /home/trashman/src/chemoelectric/rosettacode-contributions/isqrt.mac</pre>
(%o6) /home/trashman/src/chemoelectric/rosettacode-contributions/isqrt.mac</pre>




=={{header|Mercury}}==
=={{header|Mercury}}==