write(image(x), if numeric(x) then " is numeric." else " is not numeric")