Letter: More Solutions
Vector 22:2, page 10
I present some solutions to the problems posed by Ajay Askoolum in APL Idioms, Vector 21:4, pp92-96.
The development is for a great part from my libraries originated in the 198x years on :
/APLSV IBM5110/APL68000 Wicat&Ampère/later/IBMAPL2 PS+PC/IBMwinAPL2/
All are shown as DDF valid I-APL. Tests are made in I-APL to be sure that the code is OK. But the function code is cloned in APL2 Unicode, for a better understanding.
= Requested functions APL2, valid with several interpreters.
LIM: +/×(2⍴⍺)∘.-⍵
SN: (⍴⍵)⍴(,⍵)[⍋IX+~×IX←⌈10⍟LG+~×LG←|,⍵]
LS: -⌿⍵×⍉(⌽⍴⍵)⍴(1↑(⍴⍵),1)⍴1 ˉ1
CN: ((⍴⍵)⍴10⊥⍵←'0123456789'⍳⍵ : ⎕IO←0 : 0
FO: ⍵>ˉ1↓0,⍵
LO: ⍵>1↓⍵,0
RE: (,⍺)[⎕IO+R⊥⍵-⎕IO] : ∨/0=(R←⍴⍺),⍴⍵←⍉⍵ : ⍳0
= Functions which do not match prerequisite
C. Henriod, retired IBM Advisory SE, chenriod@vtx.ch
December 7, 2005.