偶极子程序forMatlab