Alias rainbow { set %rainbow $1- $replace(%rainbow,a,1a,b,2b,c,3c,d,4d,e,5e,f,6f,g,7g,h,8h,i,9i,j,10j,k,11k,l,12l,m,13m,n,14n,o,15o,p,1p,q,2q,r,3r,s,4s,t,5t,u,6u,v,7v,w,8w,x,9x,y,10y,z,11z) say %rainbow unset %rainbow }