Here is as explicit verb which includes a global copula embedded in a tacit
expression.

   sum=: 3 : 's=:+/y'
   mean=:sum % #
   mean 2 4 5 6
4.25
   s
17
   mean
+---+-+-+
|sum|%|#|
+---+-+-+
   sum
+-+-+------+
|3|:|s=:+/y|
+-+-+------+
   mean f.
+------------+-+-+
|+-+-+------+|%|#|
||3|:|s=:+/y|| | |
|+-+-+------+| | |
+------------+-+-+

This works too.

mean=: (3 : 's=:+/y') % #
   mean
+------------+-+-+
|+-+-+------+|%|#|
||3|:|s=:+/y|| | |
|+-+-+------+| | |
+------------+-+-+
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to