Mathc complexes/a217
Installer et compiler ce fichier dans votre répertoire de travail.
c00a.c |
---|
/* ------------------------------------ */
/* Save as : c00a.c */
/* ------------------------------------ */
#include "w_a.h"
/* ------------------------------------ */
void fun(void)
{
double **U_T = r_mZ(i_mZ(R1, C3), 9);
double **V_T = r_mZ(i_mZ(R1, C3), 9);
double **W_T = r_mZ(i_mZ(R1, C3), 9);
double **VxU_T = i_mZ(R1, C3);
double **WxU_T = i_mZ(R1, C3);
double **VxU_T_pls_WxU_T = i_mZ(R1, C3);
double **V_plus_W_T = add_mZ(V_T,W_T,i_mZ(R1, C3));
double **VplusW_xU_T = i_mZ(R1, C3);
UxV_mZ(V_T,U_T,VxU_T);
UxV_mZ(W_T,U_T,WxU_T);
// (vxu) + (wxu)
add_mZ(VxU_T,WxU_T,VxU_T_pls_WxU_T);
// (v+w) x u
UxV_mZ(V_plus_W_T,U_T,VplusW_xU_T);
clrscrn();
printf(" u_T :");
p_mZ(U_T, S4, P0, S3, P0, C6);
printf(" v_T :");
p_mZ(V_T, S4, P0, S3, P0, C6);
printf(" w_T :");
p_mZ(W_T, S4, P0, S3, P0, C6);
printf("\n\n"
" (v+w) x u == (vxu) + (wxu) \n\n"
" (v+w) x u :");
p_mZ(VplusW_xU_T, S5, P0, S3, P0, C6);
printf(" (vxu) + (wxu) :");
p_mZ(VxU_T_pls_WxU_T, S5, P0, S3, P0, C6);
f_mZ(U_T);
f_mZ(V_T);
f_mZ(W_T);
f_mZ(VxU_T);
f_mZ(WxU_T);
f_mZ(VxU_T_pls_WxU_T);
f_mZ(V_plus_W_T);
f_mZ(VplusW_xU_T);
}
/* ------------------------------------ */
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 -4i -9 +8i +3 -9i
v_T :
-1 +7i -9 +5i +9 +4i
w_T :
+4 -8i -3 +7i -4 +1i
(v+w) x u == (vxu) + (wxu)
(v+w) x u :
+157+149i +25+15i -55-27i
(vxu) + (wxu) :
+157+149i +25+15i -55-27i
Press return to continue
Press X return to stop