seriesindwk(s = refseries(w0))
{
        return(itemtype(s, 1, 1));
}