Here is another alternative to using the power function:

   n=:0&, ~: ,&0
   n&.>@]/\. 7#<1
+-------------+-----------+---------+-------+-----+---+-+
|1 0 1 0 1 0 1|1 1 0 0 1 1|1 0 0 0 1|1 1 1 1|1 0 1|1 1|1|
+-------------+-----------+---------+-------+-----+---+-+
   (-i.7)|."_1 ":@>   n&.>@]/\. 7#<1
1 0 1 0 1 0 1
 1 1 0 0 1 1 
  1 0 0 0 1  
   1 1 1 1   
    1 0 1    
     1 1     
      1      

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

Reply via email to