clc
clear
A=[7 3 7]
B=[-6 2 3]
C=[2 2 8]
k=cross(B,C)
L=cross(A,K)
G=dot(A,C)
H= B* G
I= dot(A,B)
F=C*I 
R= H-F