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

4 lines
42 B
Text
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
f=: >.@(1&o.)@%:
g=: 1&+@|@(2&o.)
h=: f@g