TQuaternion

type TQuaternion = record

public

  w: single;

  x: single;

  y: single;

  z: single;

  class operator multiply(TQuaternion,TQuaternion):TQuaternion();

  class operator implicit(TQuaternion):TMatrix4();

  class operator explicit(TMatrix4):TQuaternion();

end;