Thanks!  I learned (at least) a portable way to load math/misc and of
gdellipse.

However there are 8 solutions,

3 by surround 1
3 by surround 2
1 by surround none
1 by surround all


draw rctst                           NB. initial circles
(draw _1 _1 _1&apollonius) rctst     NB. internally tangent solution
(draw 1 1 1&apollonius) rctst        NB. externally tangent solution
(draw ((,:-)1 1 1)&apollonius) rctst NB. both required solutions
(draw (<:+:#:i.8)&apollonius) rctst  NB. all solutions
)

> Date: Mon, 20 Sep 2010 16:07:58 +1200
> From: "Sherlock, Ric" <[email protected]>
> Subject: Re: [Jprogramming] rosetta code apollonius
> To: Programming forum <[email protected]>
> Message-ID:
>
<f43d47796ad0844785a03f363452208468711bc...@tur-exchmbx.massey.ac.nz>
>


----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to