1NB. from stdlib.ijs
2toupper=: 3 : 0`((((65+i.26){a.)(97+i.26)}a.) {~ a. i. ])@.(2 = 3!:0)
3x=. I. 26 > n=. ((97+i.26){a.) i. t=. ,y
4($y) $ ((x{n) { (65+i.26){a.) x}t
5)
6
7