Linear Algebra and the C Language/a0bu


Code study: r_Q_mR();

/* ------------------------------------ */
/* ------------------------------------ */
double **r_Q_mR(
double **Q,
int      n
)
{
double **T = r_mR(  i_mR(Q[R_SIZE][C0]-C1,
                         Q[C_SIZE][C0]-C1),n);
                      
  orth_mR(T,Q,YES);
  
  f_mR(T);
    
 return(Q);  
}
/* ------------------------------------ */
/* ------------------------------------ */