p05215.m

本程序提供三矢量混合积的计算

clear;newplot;
axis([-1,1.5,.7,3]);
hold on;
axis off;
text(-.5,3,'两矢量的矢量积','Fontsize',20,'color','green');
[x,y,z]=peaks(30);
contour(x,y,z,2);
X=[-.5,1.5/12-.04];
Y=[1.5,1.5];
fline(X,Y,'y');
X=[1.5/12-.04,1.25];
Y=[1.5,1.5];
plot(X,Y,'y');
X=[1/12,.5];
Y=[1.5,2.75];
fline(X,Y,'c');
X=[0,.5];
Y=[1.25,2.75];
plot(X,Y,'c--');
X=[0,-.5];
Y=[1.25,1.5];
plot(X,Y,'g--');
X=[-.5,-1];
Y=[1.5,3];
fline(X,Y,'r');
X=[-.34,-.5];
Y=[1,1.5];
plot(X,Y,'r--');
X=[-.02,-.34];
Y=[0,1];
plot(X,Y,'r');
text(.4,2.75,'F');text(.38,2.8,'→');
text(-.9,2.9,'M');text(-.91,2.95,'→');
text(1.5/12,1.4,'P');
text(-.6,1.5,'O');
hold off;