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

about summary refs log tree commit diff

path: root/challenge-261/asherbhs/apl/ch-2.apl

blob: e9c1c6d686b8a033b691591734357b4e35c5db71 (plain)

MultiplyByTwo←{⍵∊⍺: ⍺∇2×⍵ ⋄ ⍵}
⎕←5 3 6 1 12 MultiplyByTwo 3
⎕←1 2 4 3    MultiplyByTwo 1
⎕←5 6 7      MultiplyByTwo 2