Помогите построить ортонормированный базис

применяется процесс ортогонализации Грама – Шмидта
пусть f1,f2,f3 исходный. e1 = f1; e2 = f2 + f1* a1
где а1 = - из условия ортогональности е1 и е2;
(e1*e2) = (f1*f2) + (f1*f1)*a1 =0; a1 = - (e1*f2)/ (f1*f1);
е (j+1) = f(j+1) + ∑f(j) *a(i) [j= 1,..,i]
где a(j) = - (a(i+1)*f(j))/(f(j)*f(j) ) .
Далее – нормируется .

http://ktrpp.ru/ortogonalizatsiya-grama-shmidta.html