subcommands of them.
<P>
<PRE>oo::class create c
c create o
<B>oo::define</B> c <B>method</B> foo {} {
    puts &quot;world&quot;
}
<B>oo::objdefine</B> o {
    <B>method</B> bar {} {
        my Foo &quot;hello &quot;
        my foo
    }
    <B>forward</B> Foo ::puts -nonewline
    <B>unexport</B> foo
}
o bar                <I><font size="+1">&#8594;</font> prints &quot;hello world&quot;</I>
o foo                <I><font size="+1">&#8594;</font> error &quot;unknown method foo&quot;</I>
o Foo Bar           