% Meriam and Kraige, 5th ed
%2/95
c=[1.5 0 4.5];
d=[0 3 0];
cd=d-c;
T=1.2*cd/(cd*cd')
-0.3207    0.6414   -0.9621
clear

%2/101
ab= [0.4 0.2 0.2];
cd= [0.4 0 -0.2];
cosv=(ab*cd')/( (ab*ab')*(cd*cd'))^0.5
vinkel=acos((ab*cd')/( (ab*ab')*(cd*cd'))^0.5 )

F=2 * ab/(ab*ab')^0.5
%Projection 
Fcd= (F*cd')*cd/(cd*cd')
%F: 1.6330    0.8165    0.8165,  Fcd=0.9798         0   -0.4899

% Cos (v) = 0.5477 = 0.3^0.5, vinkel= 0.00 rad= 56.7890 grader
%______________
clear

%2/103
% relaterat till O
b=[1.5 2.1 0.45]; c=[1.8  0  0.9]; bc=c-b;
T=3200 * bc/(bc*bc')^0.5
% T=1.0e+03* 0.4427   -3.0989    0.6640
bcnorm=bc/(bc*bc')^0.5
dr=180/3.14159265358979
vinklar=acos(bcnorm)*dr
%    82.0480  165.5579   78.0233

%2/105
clear
la=0.09; lb=0.12; lc=0.100; lz=0.140; dr=180/3.14159;  va=40/dr;           
a=[la*sin(va), -la*cos(va), lz]; b=[lb 0 0];
c=[0 lc 0]; d=[0 0 lz];
ab=b-a; dc=c-d;
abnorm= ab/(ab*ab')^0.5
%    0.3700    0.4104   -0.8335
cosabcd=abnorm*dc'/(dc*dc')^0.5
Tdc=500*cosabcd
%  458.3868
%____

%2/113
clear
r1=[0.15 0.25];
r2=[0 -0.25];
m1=[0.25*(-150)   -0.15*(-150)]
m2=[ -.25*150 0]
m=m1+m2 % -75 22.5

%2/121
vinkel=15*3.1416/180;
x=-0.2*sin(vinkel); y= 0.175; z= -(0.150+0.200*cos(vinkel));
F=225; Fx=F*cos(vinkel); Fz=-F*sin(vinkel);
M=[ y*Fz z*Fx-x*Fz y*Fx]
%  -10.1910  -77.6000   38.0333
%moment runt OA: (M.OA)OA =My (efterom OA=y)

%2/127
clear
vinkel=20*3.1416/180;
y=0.07-0.125*cos(vinkel);
z=0.2+0.125*sin(vinkel);
Fx=-200;
M=[0 z*Fx -y*Fx] 
%0  -48.5505   -9.4923
d=0.07/cos(vinkel) 
%74.5mm

%2/135
clear
w=[0 -1.4 0];
D=[-0.45 0 0 ];
summa=[-0.45 -1.5 -0.24];
L=summa-D-w
Ln=(L*L')^0.5 
%    -0.1000   -0.2400: 0.26N
Rn=(summa*summa')^0.5
%1.584

%2/137
vinkel=30*3.1416/180;
fo=-1; fa=fo; fb=1; fcz=cos(vinkel); fcy=sin(vinkel);
       xa=2; yb=1; xc=2; yc=1;
R=[0 fcy fo+fa+fb+fcz]
%         0    0.5000   -0.1340

%Mx= ( yFz-zFy)  My=zfx-xFz   Mz=xFy-yFx 
ma= [0 -xa*fa 0];
mb= [yb*fb 0 0 ];
mc= [yc*fcz 0 xc*fcy];
M=ma+mb+mc
%    1.8660    2.0000    1.0000

%2/147
z1=3; z2=4;
%Mx=-z2*Ty My=z*Tx
M=[-4 3 0]
kring mittpunkten:
%z1=-a/2 z2=+a/2
% M=-aT/2 [1 1 0]
