On Fri, Sep 5, 2008 at 8:16 AM, Raul Miller <[EMAIL PROTECTED]> wrote:
> discon=: (#~ 0 = {:"1@:+.)@(1 {:: p.)@((}.@:* [EMAIL PROTECTED])@] -/@,:
> 0,3&[EMAIL PROTECTED]@[)
I had meant to write:
discon=: (#~ 0 = {:"1@:+.)@(1 {:: p.)@((}.@:* [EMAIL PROTECTED])@] -/@,:
0,~3&[EMAIL PROTECTED]@[)
but that does not work either (I still only get two real valued roots,
and none of
them match the three I believe I should be expecting).
--
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
