Mathc matrices/a246
Application
Installer et compiler ces fichiers dans votre répertoire de travail.
/* Save as : c00a.c */
void fun(void)
double **U_T = r_mR(i_mR(R1, C3), 9); 
double **V_T = r_mR(i_mR(R1, C3), 9); 
double **W_T = r_mR(i_mR(R1, C3), 9);
double **VxU_T = i_mR(R1, C3);
double **WxU_T = i_mR(R1, C3);
double **VxU_T_pls_WxU_T = i_mR(R1, C3);
double **V_plus_W_T = add_mR(V_T,W_T,i_mR(R1, C3));
double **VplusW_xU_T = i_mR(R1, C3);
double **A = rp_mR(i_mR(R3, C3), 1);
// (v x u) 
 c_r_mR(V_T, R1, A, R2);
 c_r_mR(U_T, R1, A, R3);
 c_s_mR(cofactor_R(A, R1, C1), VxU_T, R1, C1);
 c_s_mR(cofactor_R(A, R1, C2), VxU_T, R1, C2);
 c_s_mR(cofactor_R(A, R1, C3), VxU_T, R1, C3);
// (w x u) 
 c_r_mR(W_T, R1, A, R2);
 c_r_mR(U_T, R1, A, R3);
 c_s_mR(cofactor_R(A, R1, C1), WxU_T, R1, C1);
 c_s_mR(cofactor_R(A, R1, C2), WxU_T, R1, C2);
 c_s_mR(cofactor_R(A, R1, C3), WxU_T, R1, C3);
// (vxu) + (wxu)
 add_mR(VxU_T,WxU_T,VxU_T_pls_WxU_T);
// (v+w) x u 
 c_r_mR(V_plus_W_T, R1, A, R2);
 c_r_mR(U_T , R1, A, R3);
 c_s_mR(cofactor_R(A, R1, C1), VplusW_xU_T, R1, C1);
 c_s_mR(cofactor_R(A, R1, C2), VplusW_xU_T, R1, C2);
 c_s_mR(cofactor_R(A, R1, C3), VplusW_xU_T, R1, C3);
 clrscrn(); 
 printf(" u_T :");
 p_mR(U_T, S4, P0, C6);
 printf(" v_T :");
 p_mR(V_T, S4, P0, C6);
 printf(" w_T :");
 p_mR(W_T, S4, P0, C6);
 printf("\n\n"
 " (v+w) x u == (vxu) + (wxu) \n\n" 
 " (v+w) x u :"); 
 p_mR(VplusW_xU_T, S5, P0, C6); 
 printf(" (vxu) + (wxu) :");
 p_mR(VxU_T_pls_WxU_T, S5, P0, C6);
 f_mR(U_T); 
 f_mR(V_T);
 f_mR(W_T); 
 f_mR(VxU_T); 
 f_mR(WxU_T);
 f_mR(VxU_T_pls_WxU_T); 
 f_mR(V_plus_W_T);
 f_mR(VplusW_xU_T);
 f_mR(A); 
/* ------------------------------------ */
int main(void)
time_t t;
 srand(time(&t));
do
 fun();
} while(stop_w());
 return 0;
/* ------------------------------------ */
 Les vecteurs en mathématiques sont supposés être des vecteurs colonnes, c'est pour cela que j'utilise _T pour afficher des vecteurs lignes.

Exemple de sortie écran :
 u_T :
 +1 -6 +8 
 v_T :
 +5 +5 -7 
 w_T :
 +3 +8 +6 
 (v+w) x u == (vxu) + (wxu) 
 (v+w) x u :
 +98 -65 -61 
 (vxu) + (wxu) :
 +98 -65 -61 
 Press return to continue
 Press X return to stop

Mathc matrices/a247
Application
Installer et compiler ces fichiers dans votre répertoire de travail.
/* Save as : c00a.c */
void fun(void)
double u_T[R1*C3] = { 4, 2, 5}; 
double v_T[R1*C3] = { 3, 4, 1};
double w_T[R1*C3] = { 5, 1, 3};
double **U_T = ca_A_mR(u_T , i_mR(R1, C3));
double **V_T = ca_A_mR(v_T , i_mR(R1, C3));
double **W_T = ca_A_mR(w_T , i_mR(R1, C3));
double **VxU_T = i_mR(R1, C3);
double **WxU_T = i_mR(R1, C3);
double **VxU_T_pls_WxU_T = i_mR(R1, C3);
double **V_plus_W_T = add_mR(V_T,W_T,i_mR(R1, C3));
double **VplusW_xU_T = i_mR(R1, C3);
double **A = rp_mR(i_mR(R3, C3), 1);
// (v x u) 
 c_r_mR(V_T, R1, A, R2);
 c_r_mR(U_T, R1, A, R3);
 c_s_mR(cofactor_R(A, R1, C1), VxU_T, R1, C1);
 c_s_mR(cofactor_R(A, R1, C2), VxU_T, R1, C2);
 c_s_mR(cofactor_R(A, R1, C3), VxU_T, R1, C3);
// (w x u) 
 c_r_mR(W_T, R1, A, R2);
 c_r_mR(U_T, R1, A, R3);
 c_s_mR(cofactor_R(A, R1, C1), WxU_T, R1, C1);
 c_s_mR(cofactor_R(A, R1, C2), WxU_T, R1, C2);
 c_s_mR(cofactor_R(A, R1, C3), WxU_T, R1, C3);
// (vxu) + (wxu)
 add_mR(VxU_T,WxU_T,VxU_T_pls_WxU_T);
// (v+w) x u 
 c_r_mR(V_plus_W_T, R1, A, R2);
 c_r_mR(U_T , R1, A, R3);
 c_s_mR(cofactor_R(A, R1, C1), VplusW_xU_T, R1, C1);
 c_s_mR(cofactor_R(A, R1, C2), VplusW_xU_T, R1, C2);
 c_s_mR(cofactor_R(A, R1, C3), VplusW_xU_T, R1, C3);
 clrscrn(); 
 printf(" u_T :");
 p_mR(U_T, S4, P0, C6);
 printf(" v_T :");
 p_mR(V_T, S4, P0, C6);
 printf(" w_T :");
 p_mR(W_T, S4, P0, C6);
 printf("\n\n"
 " (v+w) x u == (vxu) + (wxu) \n\n" 
 " (v+w) x u :"); 
 p_mR(VplusW_xU_T, S5, P0, C6); 
 printf(" (vxu) + (wxu) :");
 p_mR(VxU_T_pls_WxU_T, S5, P0, C6);
 stop();
 f_mR(U_T); 
 f_mR(V_T);
 f_mR(W_T); 
 f_mR(VxU_T); 
 f_mR(WxU_T);
 f_mR(VxU_T_pls_WxU_T); 
 f_mR(V_plus_W_T);
 f_mR(VplusW_xU_T);
 f_mR(A); 
/* ------------------------------------ */
int main(void)
 fun();
 return 0;
/* ------------------------------------ */
 Les vecteurs en mathématiques sont supposés être des vecteurs colonnes, c'est pour cela que j'utilise _T pour afficher des vecteurs lignes.

Exemple de sortie écran :
 u_T :
 +4 +2 +5 
 v_T :
 +3 +4 +1 
 w_T :
 +5 +1 +3 
 (v+w) x u == (vxu) + (wxu) 
 (v+w) x u :
 +17 -24 -4 
 (vxu) + (wxu) :
 +17 -24 -4 
 Press return to continue.

Mathc matrices/a248
Application
Installer et compiler ces fichiers dans votre répertoire de travail.
/* Save as : c00a.c */
void fun(void)
double s = r_I(9);
double **U_T = r_mR(i_mR(R1, C3), 9); 
double **V_T = r_mR(i_mR(R1, C3), 9); 
double **sU_T = smul_mR(s,U_T,i_mR(R1, C3)); 
double **sV_T = smul_mR(s,V_T,i_mR(R1, C3)); 
double **UxV_T = i_mR(R1, C3);
double **s_UxV_T = i_mR(R1, C3);
double **sUxV_T = i_mR(R1, C3);
double **UxsV_T = i_mR(R1, C3);
double **A = rp_mR(i_mR(R3, C3), 1);
// s (u x v) 
 c_r_mR(U_T, R1, A, R2);
 c_r_mR(V_T, R1, A, R3);
 c_s_mR(cofactor_R(A, R1, C1), UxV_T, R1, C1);
 c_s_mR(cofactor_R(A, R1, C2), UxV_T, R1, C2);
 c_s_mR(cofactor_R(A, R1, C3), UxV_T, R1, C3);
 smul_mR(s,UxV_T,s_UxV_T);
// (su x v) 
 c_r_mR(sU_T, R1, A, R2);
 c_r_mR(V_T, R1, A, R3);
 c_s_mR(cofactor_R(A, R1, C1), sUxV_T, R1, C1);
 c_s_mR(cofactor_R(A, R1, C2), sUxV_T, R1, C2);
 c_s_mR(cofactor_R(A, R1, C3), sUxV_T, R1, C3);
// (u x sv) 
 c_r_mR(U_T, R1, A, R2);
 c_r_mR(sV_T, R1, A, R3);
 c_s_mR(cofactor_R(A, R1, C1), UxsV_T, R1, C1);
 c_s_mR(cofactor_R(A, R1, C2), UxsV_T, R1, C2);
 c_s_mR(cofactor_R(A, R1, C3), UxsV_T, R1, C3);
 clrscrn();
 printf(" s = %+.0f\n\n",s); 
 printf(" u_T :");
 p_mR(U_T, S4, P0, C6);
 printf(" v_T :");
 p_mR(V_T, S4, P0, C6);
 printf("\n"
 " s (uxv) == su x v == u x sv\n\n"
 " s (uxv) :" ); 
 p_mR(s_UxV_T, S5, P0, C6);
 printf(" su x v :" ); 
 p_mR(sUxV_T, S5, P0, C6);
 printf(" u x sv :" ); 
 p_mR(UxsV_T, S5, P0, C6);
 f_mR(U_T); 
 f_mR(V_T); 
 f_mR(sU_T); 
 f_mR(sV_T); 
 f_mR(UxV_T); 
 f_mR(s_UxV_T);
 f_mR(sUxV_T); 
 f_mR(UxsV_T);
 f_mR(A); 
/* ------------------------------------ */
int main(void)
time_t t;
 srand(time(&t));
do
 fun();
} while(stop_w());
 return 0;
/* ------------------------------------ */
 Les vecteurs en mathématiques sont supposés être des vecteurs colonnes, c'est pour cela que j'utilise _T pour afficher des vecteurs lignes.

Exemple de sortie écran :
 s = -3
 u_T :
 +6 +2 -2 
 v_T :
 -5 +3 -7 
 s (uxv) == su x v == u x sv
 s (uxv) :
 +24 -156 -84 
 su x v :
 +24 -156 -84 
 u x sv :
 +24 -156 -84 
 Press return to continue
 Press X return to stop