Mathc matrices/a237
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 **U_T = ca_A_mR(u_T , i_mR(R1, C3));
double **V_T = ca_A_mR(v_T , i_mR(R1, C3));
double **A = rp_mR( i_mR(R3, C3), 1);
double **B = rp_mR( i_mR(R3, C3), 1);
 c_r_mR(U_T, R1, A, R2);
 c_r_mR(V_T, R1, A, R3);
 c_r_mR(V_T, R1, B, R2);
 c_r_mR(U_T, R1, B, R3);
 clrscrn(); 
 printf(" u_T :");
 p_mR(U_T, S3, P0, C6);
 printf(" v_T :");
 p_mR(V_T, S3, P0, C6);
 printf("\n u x v == -v x u C* = cofactors \n\n"
 " u x v = (C11, C12, C13) = (%+.0f, %+.0f, %+.0f) \n"
 " v x u = (C11, C12, C13) = (%+.0f, %+.0f, %+.0f)\n\n", 
 cofactor_R(A, R1, C1), 
 cofactor_R(A, R1, C2), 
 cofactor_R(A, R1, C3), 
 cofactor_R(B, R1, C1), 
 cofactor_R(B, R1, C2), 
 cofactor_R(B, R1, C3) );
 stop(); 
 f_mR(U_T); 
 f_mR(V_T);
 f_mR(A);
 f_mR(B); 
/* ------------------------------------ */
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 
 u x v == -v x u C* = cofactors 
 u x v = (C11, C12, C13) = (-18, +11, +10) 
 v x u = (C11, C12, C13) = (+18, -11, -10)
 Press return to continue.

Mathc matrices/a239
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 **U_T = ca_A_mR(u_T , i_mR(R1, C3));
double **V_T = ca_A_mR(v_T , i_mR(R1, C3));
double **UxV_T = i_mR(R1, C3);
double **UxV = i_mR(R3, C1); 
double **A = rp_mR(i_mR(R3, C3), 1);
double **U = transpose_mR(U_T, i_mR(R3, C1));
 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);
 transpose_mR(UxV_T, UxV);
 clrscrn(); 
 printf(" u_t :");
 p_mR(U_T, S4, P0, C6);
 printf(" v_t :");
 p_mR(V_T, S4, P0, C6);
 printf(" uxv_t :");
 p_mR(UxV_T, S4, P0, C6);

printf("\n u.(u x v) == %+.4f \n\n\n", 
 dot_uv_R(U, UxV) ); 
 stop();
 f_mR(U_T); 
 f_mR(V_T);
 f_mR(UxV_T);
 f_mR(U); 
 f_mR(UxV); 
 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 
 uxv_t :
 -18 +11 +10 
 u.(u x v) == +0.0000 
 Press return to continue.

Mathc matrices/a238
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 **UxV_T = i_mR(R1, C3);
double **UxV = i_mR(R3, C1); 
double **A = rp_mR(i_mR(R3, C3), 1);
double **U = transpose_mR(U_T, i_mR(R3 , C1));
 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);
 transpose_mR(UxV_T, UxV);
 clrscrn(); 
 printf(" u_t :");
 p_mR(U_T, S4, P0, C6);
 printf(" v_t :");
 p_mR(V_T, S4, P0, C6);
 printf(" uxv_t :");
 p_mR(UxV_T, S4, P0, C6);
 printf("\n u.(u x v) == %+.4f \n\n", 
 dot_uv_R(U, UxV) ); 
 f_mR(U_T); 
 f_mR(V_T);
 f_mR(UxV_T);
 f_mR(U); 
 f_mR(UxV); 
 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 :
 +9 -6 +5 
 v_t :
 -6 +2 -6 
 uxv_t :
 +26 +24 -18 
 u.(u x v) == +0.0000 
 Press return to continue
 Press X return to stop

Mathc matrices/a240
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 **U = transpose_mR(U_T, i_mR(R3, C1));
double **V = transpose_mR(V_T, i_mR(R3, C1));
double **UxV_T = i_mR(R1, C3); 
double **UxV = i_mR(R3, C1) ;
double **A = rp_mR(i_mR(R3, C3), 1);
 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);
 transpose_mR(UxV_T, UxV);
 clrscrn(); 
 printf(" u_t :");
 p_mR(U_T, S4, P0, C6);
 printf(" v_t :");
 p_mR(V_T, S4, P0, C6);
 printf(" uxv_t :");
 p_mR(UxV_T, S4, P0, C6);
 printf("\n"
 " ||u x v||**2 == ||u||**2 ||v||**2 - (u.v)**2 \n\n" 
 " ||u x v||**2 == %+.4f \n"
 " ||u||**2 ||v||**2 - (u.v)**2 == %+.4f \n\n", 
 pow( norm_uv_R(UxV), 2.), 
 pow( norm_uv_R(U ), 2.)
 * pow( norm_uv_R(V ), 2.)
 - pow( dot_uv_R(U, V), 2.)

f_mR(U_T); 
 f_mR(V_T);
 f_mR(UxV_T);
 f_mR(U); 
 f_mR(V);
 f_mR(UxV); 
 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 :
 -8 -7 +6 
 v_t :
 +8 -1 -4 
 uxv_t :
 +34 +16 +64 
 ||u x v||**2 == ||u||**2 ||v||**2 - (u.v)**2 
 ||u x v||**2 == +5508.0000 
 ||u||**2 ||v||**2 - (u.v)**2 == +5508.0000 
 Press return to continue
 Press X return to stop

Mathc matrices/a241
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 **U_T = ca_A_mR(u_T , i_mR(R1, C3));
double **V_T = ca_A_mR(v_T , i_mR(R1, C3));
double **U = transpose_mR(U_T, i_mR(R3, C1));
double **V = transpose_mR(V_T, i_mR(R3, C1));
double **UxV_T = i_mR(R1, C3); 
double **UxV = i_mR(R3, C1) ;
double **A = rp_mR(i_mR(R3, C3), 1);
 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);
 transpose_mR(UxV_T, UxV);
 clrscrn(); 
 printf(" u_t :");
 p_mR(U_T, S4, P0, C6);
 printf(" v_t :");
 p_mR(V_T, S4, P0, C6);
 printf(" uxv_t :");
 p_mR(UxV_T, S4, P0, C6);
 printf("\n"
 " ||u x v||**2 == ||u||**2 ||v||**2 - (u.v)**2 \n\n" 
 " ||u x v||**2 == %+.4f \n"
 " ||u||**2 ||v||**2 - (u.v)**2 == %+.4f \n\n\n", 
 pow( norm_uv_R(UxV), 2.), 
 pow( norm_uv_R(U ), 2.)
 * pow( norm_uv_R(V ), 2.)
 - pow( dot_uv_R(U, V), 2.)
 stop();
 f_mR(U_T); 
 f_mR(V_T);
 f_mR(UxV_T);
 f_mR(U); 
 f_mR(V);
 f_mR(UxV); 
 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 
 uxv_t :
 -18 +11 +10 
 ||u x v||**2 == ||u||**2 ||v||**2 - (u.v)**2 
 ||u x v||**2 == +545.0000 
 ||u||**2 ||v||**2 - (u.v)**2 == +545.0000 
 Press return to continue.