getaspect(w)
{
        local a;

        if (argc < 1) w = refwindow(w0);

        a = setaspect(w);

        return(a);
}