TKraftContactPair

type TKraftContactPair = record

public

  Previous: PKraftContactPair;

  Next: PKraftContactPair;

  HashBucket: TKraftInt32;

  HashPrevious: PKraftContactPair;

  HashNext: PKraftContactPair;

  Island: TKraftIsland;

  Shapes: array [0..1] of TKraftShape;

  ContainerIndex: TKraftInt32;

  ElementIndex: TKraftInt32;

  MeshContactPair: TKraftMeshContactPair;

  MeshContactPairGeneration: TKraftUInt64;

  MeshContactPairNextContactPair: PKraftContactPair;

  MeshContactPairPreviousContactPair: PKraftContactPair;

  RigidBodies: array [0..1] of TKraftRigidBody;

  Edges: array [0..1] of TKraftContactPairEdge;

  Friction: TKraftScalar;

  Restitution: TKraftScalar;

  RestitutionThreshold: TKraftScalar;

  Manifold: TKraftContactManifold;

  Flags: TKraftContactFlags;

  TimeOfImpactCount: TKraftInt32;

  TimeOfImpact: TKraftScalar;

  procedure GetSolverContactManifold();

  procedure DetectCollisions();

end;