#include 

getseriestype(s = refseries(w0))
{
        local val, valestr, typestr;

        if (iswindow(s))
        {
                s = refseries(s);
        }

        (val, valstr, typestr) = valuetype(s, LOCAL_VARIABLE);

        return(typestr);
}