do i=0 to 15
s=
do j=1 to 16
s=lower(d2x(-i*j,1))s
end
say s
end