+Container >>
 H : ?
 ...
;

+BoxContainer = Container [Box]

BrushBoxContainer = BoxContainer [Brush, RGB_*, CLR_*]
PencilBoxContainer = BoxContainer [Pencil, PLT_*, CLR_*]