format short e

A = [0.7000 0.70711;0.70001 0.70711]

r11 = norm(A(:,1))
q1 = A(:,1)/r11
r12 = Qm(:,1)'*A(:,2)
a2 = A(:,2)
v2 = A(:,2)-r12*q1
q2 = (A(:,2)-r12*Qm(:,1))/norm(A(:,2)-r12*Qm(:,1))

