cmpx 's1 {⍺{⍺⍴⍨≢⍵}@(⍸(|m)/m<0)⊢⍵⍀⍨m←(¯1+2×≢⍵)⍴1,-≢⍺} s2' 's1 {∊(1↑⍵),⍺∘,¨1↓⍵} s2' 's1 {⊃(⊣,⍺,⊢)/,¨⍵} s2'
s1 {⍺{⍺⍴⍨≢⍵}@(⍸(|m)/m<0)⊢⍵⍀⍨m←(¯1+2×≢⍵)⍴1,-≢⍺} s2 → 4.8E¯5 | 0% ⎕⎕⎕
s1 {∊(1↑⍵),⍺∘,¨1↓⍵} s2 → 1.2E¯4 | +150% ⎕⎕⎕⎕⎕⎕⎕
s1 {⊃(⊣,⍺,⊢)/,¨⍵} s2 → 6.7E¯4 | +1296% ⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕