Also, the example draw rctst produces
|index error: flipyrect
| c=.H-+/"1[1 3 {"1 y
on my system. The easiest solution is to draw twice using reflex.
Note 'display solutions'
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
