RosettaCodeData/Task/Generator-Exponential/J/generator-exponential-6.j

2 lines
52 B
Plaintext

uncubicalSquares=: {. squares@<.@p.~&3 1.1 -. cubes