(defclass faceset
:super cascaded-coords
:slots
(box ;bounding box
faces ; 面データ
edges ; 辺データ
vertices ; 頂点データ
model-vertices
))
(defclass body
:super faceset
:slots (
convexp ; 凸かどうか
evertedp ; ひっくり返っているかどうか
csg ; CSG表現
))
というように，cascaded-coordsを親クラスとして持つようなクラス定義になっ
ている．そのため，cascaded-coordsで定義されていた:assocなどの手続き
もbodyのインスタンスに対して適用できることになる．
図2に，bodyデータを表現するデータの種類と意味を示す．
![\includegraphics[width=8cm]{/home/inaba/eps/lecture/beam.eps}](img2.png)