ทดลองเปรียบเทียบว่าถ้าใช้ GPU คำนวณใน Mathematica จะเร็วขึ้นจากที่ใช้ CPU มากน้อยเท่าใด เครื่องที่ใช้ทดสอบคือ Dell Precision T5500 , CPU Xeon 2.66 GHz X5650 RAM 12GB, Windows 7 64-Bit, NVIDIA Quadro 4000, Mathematica 8.0.4
คำสั่งที่ใช้ครับ
a=RandomReal[{0,1},{2048,2048}];
b=RandomReal[{0,1},{2048,2048}];
AbsoluteTiming[Do[CUDADot[a,b];,{100}];]
AbsoluteTiming[Do[Dot[a,b];,{100}];]
c=RandomReal[{0,1},{512,512}];
AbsoluteTiming[Do[CUDAFourier[c];,{100}]]
AbsoluteTiming[Do[Fourier[c];,{100}]]