Changes between Version 15 and Version 16 of TolOop

Timestamp:

Feb 11, 2010, 8:33:11 AM (15 years ago)

Author:

Víctor de Buen Remiro

Comment:

--

TolOop

@@ -287 +287 @@
    Real min.x, Real max.x,
    Real min.y, Real max.y,
-   Real min.r, Real max.r,)
+   Real min.r, Real max.r)
   {
     @Circle::New(Rand(min.x,max.x),
@@ -297 +297 @@
 Real includes(Real x, Real y)
 {
-  (x-_.center.x)^2+(y-_.center.y)^2<=_.radius^2
-}
-
-};
+  (x-_.center.x_)^2+(y-_.center.y_)^2<=_.radius^2
+};
+Real outsides(Real x, Real y){ Not(includes(x,y)) }
+};  
 
 @Circle c1 = @Circle::New(0,0,1);