Total circles area: Difference between revisions
Content added Content deleted
m (→optimized: changed some whitespace and comments, optimized the code for finding completely overlapping circles.) |
m (→optimized: changed a comment.) |
||
| Line 2,624: | Line 2,624: | ||
@y.j-@r.j < @y.k-@r.k | @x.j+@r.j > @x.k+@r.k then iterate |
@y.j-@r.j < @y.k-@r.k | @x.j+@r.j > @x.k+@r.k then iterate |
||
if verbose then say 'Circle ' right(j,w) ' is contained in circle ' right(k,w) |
if verbose then say 'Circle ' right(j,w) ' is contained in circle ' right(k,w) |
||
@r.j= 0; #in= #in + 1 /*elide this circle; and bump # |
@r.j= 0; #in= #in + 1 /*elide this circle; and bump #in.*/ |
||
end /*k*/ |
end /*k*/ |
||
end /*j*/ /* [↑] elided overlapping circle.*/ |
end /*j*/ /* [↑] elided overlapping circle.*/ |
||