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