RosettaCodeData/Task/Function-composition/J/function-composition-3.j

4 lines
42 B
Plaintext

f=: >.@(1&o.)@%:
g=: 1&+@|@(2&o.)
h=: f@g