Talk:Seven-sided dice from five-sided dice: Difference between revisions
Content added Content deleted
(J suggestions) |
|||
Line 10: | Line 10: | ||
:You could use this <code>dice5</code> and either <code>dice7a</code> or <code>dice7b</code> for the main bit: |
:You could use this <code>dice5</code> and either <code>dice7a</code> or <code>dice7b</code> for the main bit: |
||
<lang j>dice5=: >:@:?@$&5 |
<lang j>dice5=: >:@:?@$&5 NB. [: >: ] ?@$ 5: might be easier to parse for tacit beginners? |
||
dice7a=: 0 8 -.~ 3 >.@%~ 5 #. [: <:@dice5 2 ,~ ] |
dice7a=: 0 8 -.~ 3 >.@%~ 5 #. [: <:@dice5 2 ,~ ] |
||
dice7b=: [: (#~ 7&>:) 3 >.@%~ [: 5&#.&.:<:@dice5 ] , 2: </lang> |
dice7b=: [: (#~ 7&>:) 3 >.@%~ [: 5&#.&.:<:@dice5 ] , 2: </lang> |