parent $frob_class
object $wearable_class

var $root child_index 0
var $root owners [$wearable_class]
var $root owned [$wearable_class]
var $root fertile 0
var $root inited 1
var $root manager $wearable_class
var $root writable [$wearable_class]
var $root readable ['parameters, 'methods, 'code]
var $root dbref 'wearable_class

method new
    arg name, desc;
    
    if (type(name) != 'string)
        throw(~test, "test reason.");
.