Aller au contenu

Mathc complexes/a164

Un livre de Wikilivres.


Application


Installer et compiler ces fichiers dans votre répertoire de travail.


c00b.c
/* ------------------------------------ */
/*  Save as :   c00b.c                  */
/* ------------------------------------ */
#include "w_a.h"
/* ------------------------------------ */  
#define RAb          R2  
#define CA           C2
#define Cb           C1
/* ------------------------------------ */
/* ------------------------------------ */
void fun(void)
{
double ab[R2*(CA+Cb)*C2] ={  
   -6.0000,+0.0000,    +0.0000,+9.0000,    +9.0000,-16.0000, 
  -10.0000,-1.0000,    -1.0000,+6.0000,    +1.0000,-6.0000   
};
                     
double **Ab = ca_A_mZ(ab, i_Abr_Ac_bc_mZ(RAb,CA,Cb));                        
	
  clrscrn();
  printf(" Copy/Past into the octave window.\n\n");
  p_Octave_mZ(Ab,"Ab",P2, P2);
  printf(" rref(Ab,.00000000001)\n\n");
  printf(" Let's calculate B and C :");
  p_mZ(gj_mZ(Ab), S5,P8, S9,P8, C3);
  stop();

  f_mZ(Ab);
}
/* ------------------------------------ */
int main(void)
{
  fun();

  return 0;
}
/* ------------------------------------ */
/* ------------------------------------ */


 Calculons B et C.


Exemple de sortie écran :
 ------------------------------------ 
 Copy/Past into the octave window.

 Ab=[
-6.00+0.00*i,+0.00+9.00*i,+9.00-16.00*i;
-10.00-1.00*i,-1.00+6.00*i,+1.00-6.00*i]

 rref(Ab,.00000000001)

 Let's calculate B and C :
+1.00000000+0.00000000i +0.00000000+0.00000000i +1.09230769-0.67179487i 
+0.00000000+0.00000000i +1.00000000+0.00000000i -2.22564103-1.72820513i 

 Press return to continue.