Attribute VB_Name = "Shapes"

Option Explicit

'Shape type enumeration
Public Const ShapeType_Box As Long = 0
Public Const ShapeType_Sphere As Long = 1
Public Const ShapeType_StaticPlane As Long = 2
Public Const ShapeType_Cylinder As Long = 3
Public Const ShapeType_Capsule As Long = 4
Public Const ShapeType_Cone As Long = 5
Public Const ShapeType_HeightField As Long = 6
Public Const ShapeType_Compound As Long = 7
Public Const ShapeType_ConvexHull As Long = 8
