Linear Algebra and the C Language/a0ai
Code study: Normalize_mR();
/* ------------------------------------ */
/* ------------------------------------ */
double **Normalize_mR(
double **Q
)
{
double **u = i_mR(rsize_R(Q),C1);
double **q = i_mR(rsize_R(Q),C1);
int c_Q = csize_R(Q);
int c;
for( c = C1; c <= c_Q; c++)
{
c_c_mR(Q,c, u,C1);
smul_mR(1./norm_R(u),u, q);
c_c_mR(q,C1, Q,c);
}
f_mR(u);
f_mR(q);
return(Q);
}
/* ------------------------------------ */
/* ------------------------------------ */