/* color index to integer composite color */
color2int(color)
{
        local r, g, b, intcolor;

        (r, g, b) = color2rgb(color);

        intcolor = rgb2int(r, g, b);

        return(intcolor);
}