Kip Murray wrote: > E =: 0$<1 > 3!:0 E NB. E is boxed: > 32 >
Raul responded: > L.E > 0 To be explicit, Raul's suggesting you change your test for "is boxed". A common test for "is boxed" in J is (0<L.) . So you could rewrite your IsSet from: > IsSet =: [: *./ (-: /:~),(-: ~.),(1 = #...@$),(32 = 3!:0) IsSet =: [: *./ (-: /:~),(-: ~.),(1 = #...@$),(0 < L.) or even IsSet =: (-: /:~)*.(-: ~.)*.(1 = #...@$)*.(0 < L.) to save yourself some characters. By the way, (1 = #@:~.) is a more efficient way to write (-: ~.) I believe. Or was it (-: _1&|.) ? -Dan ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
