if you want to avoid the use of power ^: then just add 1 to y where y=0…
   x(%]+0=])y
0.5 2 1.33333


> On 6 May 2016, at 10:53 AM, 'Pascal Jasmin' via Programming 
> <[email protected]> wrote:
> 
> I would go with first version.  What don't you like about it?
> 
> 
> 
> 
> ----- Original Message -----
> From: Joe Bogner <[email protected]>
> To: [email protected]
> Sent: Thursday, May 5, 2016 8:47 PM
> Subject: [Jprogramming] divide if not zero
> 
> Given a list of numbers in x and y, what would be the simplest way to
> divide x by y unless y is zero?
> 
> I came up with these and I wasn't thrilled with any of them
> 
> (3,2,4) %^:(0~:])"0 (6,0,3)
> 
> 0.5 0 1.33333
> 
> 
> (3,2,4) ]`%@.(0~:])"0 (6,0,3)
> 
> 0.5 0 1.33333
> 
> 
> It would be nice if it worked on x and y as atoms too
> 
> 
> (5 divideExceptZero 0) -: 0
> 
> 
> I suppose I could just replace the _ with 0 too, but that also seems
> excessive
> 
> 
> (3,2,4) ((0,]) {~ _ ~: ])@% (6,0,3)
> 
> 0.5 0 1.33333
> 
> 
> but it does work with atoms:
> 
> 
> divideExceptZero =: ((0,]) {~ _ ~: ])@%
> 
> 
> (5 divideExceptZero 0) -: 0
> 
> 1
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm 
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm

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

Reply via email to