src/HOL/SPARK/Examples/Sqrt/Sqrt.ads
author wenzelm
Mon, 13 Apr 2020 22:08:14 +0200
changeset 71751 abf3e80bd815
parent 41561 d1318f3c86ba
permissions -rw-r--r--
tuned NEWS;

package Sqrt is

   function Isqrt(N: Natural) return Natural;
   --# return R => R * R <= N and (R + 1) * (R + 1) > N;

end Sqrt;