It looks like 3/17/2012 12 am EST is in the past, so I dug up the
solution I wrote for this, and here it is:
rmsk=:2 :0
1j1 #"1 (' ',m) {~ n * 1 + ($n) ?@$ (#m)"_
)
gf=: '/|\o' rmsk (5>:+/&.*:/~i:5)
sham=: 'Oo' rmsk (5 >: <./(5 10, 13 5,:13 14) +/&.:*:@:-"1/ ,"0/~i.21)
Example use:
gf ''
\
\ o o o \ o /
| / o o \ \ o / |
o \ / \ o | | / /
/ / o | | / | \ |
\ o / o | o o \ o o \
/ o / / o | | \ \
| | o \ | | / / /
o o \ | o \ | o |
\ o o | / | /
/
sham ''
O
O O O o O O O
O o O O O o o O o
o o o o O O o o O
O O O O o o o O O
o o O O o O o o O o o
o O o o o o o o o
O O o O O o O o O
o o O O o O o O o O
O o O O o o o O o o O o o o O O
o o o O o o O o o o o O o O O O O o
o o o o O o o o O o o o o o O o O O
O O O O O o o O o O o o O o o O o O
o o o O O o O o o O o o O O o O o O o O
O o O o o O O O O O o o O O O O o o
O O o o O o o o O O O O o o O o o O
O O o O O O O o o o o O o o o o o o
o O O o O o O O o o O O o o
o o
--
Raul
On Fri, Mar 2, 2012 at 2:33 AM, Linda Alvord <lindaalv...@verizon.net> wrote:
> Challenge 8 A Shaamrock for St. Patrick PLEASE DO NOT RESPOND UNTIL
> 3/17/2012 12 am EST
>
> To get started for this challenge, begin with a round shape. Imagine a
> grapefruit tree as seen from an airplane and define gf which applied to a
> list y looks like this.
> First produce one and then two grapefruit trees like these.
>
> gf y
> O
> \ | O \ / O |
> / / O O \ O \ O /
> \ O | / \ | O \ O
> | O O / \ O \ O O
> O O / \ O O / / / / /
> | \ O O O O | / O
> O O / O O | / O O
> O \ / \ O O / | O
> | O O \ O O \
> O
> (gf y),.gf y
> / \
> O \ O O / O / / O / | | | /
> | \ / \ O O \ O O O | \ \ \ | \ O O
> O \ / \ \ \ O / / | | O \ O O \ / \
> O O O | | O / / O | O \ O / O O O \
> \ / O O O O O | O \ / \ O O / \ / | \ O O O
> O / | / O O / | | | \ / O / \ \ O |
> \ | O O | O \ \ O / O / O / \ | \ |
> O \ \ / O / O O / / / O / \ / | \ O
> O \ \ O \ / \ O | \ | / O O
> O \
>
> Now that you are able to make a round shape, create a shamrock of any size
> and shape that you like as a tribute to St. Patrick.
>
> Linda
>
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
