TQuaternion3D

type TQuaternion3D = record

public

  constructor Create();

  class operator assign(TQuaternion3D):TMatrix3D();

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

  function Length;

  function Normalize;

  function ToString;

  case Integer of

    0: (

        V: TVector3DType;

      );

    1: (

        ImagPart: TPoint3D;

        RealPart: Single;

      );

end;