do i=0 to 15
a=
do j=0 to 15
a=a||d2x(i*j//16)
end
say lower(a)
end