pull x
do i=1 to length(x)
b=substr(x,i,1)
c=
if b>" "then c=xrange(A,b)
say c
end