ch-1.apl « apl « asherbhs « challenge-262 - github/perlweeklychallenge-club.git - Unnamed repository; edit this file 'description' to name the repository.

about summary refs log tree commit diff

path: root/challenge-262/asherbhs/apl/ch-1.apl

blob: 63974de53fa46e831660e4c30334afc1c4866a3c (plain)

MaxPositiveNegative←{⌈/+/1 ¯1∘.=×⍵}

⎕←MaxPositiveNegative ¯3 1 2 ¯1 3 ¯2 4
⎕←MaxPositiveNegative ¯1 ¯2 ¯3 1
⎕←MaxPositiveNegative 1 2