Does this help?
ff =: * 1&|.
ff 2 3 4
6 12 8
2 3 4 * 3 4 2
6 12 8
--Kip Murray
Sent from my iPad
> On Oct 25, 2013, at 10:36 PM, Don Kelly <[email protected]> wrote:
>
> I have written a couple of explicit verbs for Y-delta network transforms and
> would like advice on how to express them in a tacit form.
> This is for my learning benefit as the use of these comes up only
> occasionally and input and output are always only 3 numbers.
>
> deltoy=:3 : '(y*_1|.y)%+/y' from Delta to Wye
>
> ytodel =:3 : '(+/(y*_1|.y))% 2 0 1{y' Wye to Delta
>
> input and output are of the form zij =: a b c where a bc may be real or
> complex
>
> my problem is getting around the multiple use of y I suspect that a train of
> forks might work but haven't got it yet.
>
> In addition is there an easier way to obtain pairs a*b b*c and c*a than what
> I have used?
>
> --
> Thanks
> Don Kelly
>
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm