class foo {
    public var ð;
}

foo à();

proc main()
{
    var s, v;

    s = oadl::objname(à);
    "objname(à) = \"", s, "\"; type = ", ?? s, '\n';
    v = oadl::findobj(s);
    "findobj(\"", s, "\") = ", v, '\n';

    s = oadl::pubname(public::ð);
    "pubname(ð) = \"", s, "\"; type = ", ?? s, '\n';
    v = oadl::findpub(s);
    "findpub(\"", s, "\") = ", v, '\n';
}