/* scale factor for series X units */
gethunitsscale(s = refwindow(w0))
{
        local name, abbr, scale;

        (name, abbr, scale) = getunitinfo(gethunits(s));

        return(scale);
}