Mathc complexes/a199

Un livre de Wikilivres.


Application


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


c00a.c
/* ------------------------------------ */
/*  Save as :   c00a.c                  */
/* ------------------------------------ */
#include "w_a.h"
/* ------------------------------------ */
#define    RA            R3
#define    CA            C3
/* ------------------------------------ */
int main(void)
{
double a[RA*(CA*C2)] ={ 1,2,  3,4,  5,6,
                        5,4,  1,3,  6,8,
                        7,2,  5,1,  1,1};
                        
double **A = ca_A_mZ(a,i_mZ(RA,RA));

double ** Cofactor = i_mZ(RA,RA);

  clrscrn();
  printf(" A :\n");
  p_mZ(A, S5,P0, S4,P0, C6);

  printf(" Cofactor :\n");
  p_mZ(cofactor_mZ(A,Cofactor), S5,P0, S4,P0, C6);
  stop();

  f_mZ(A);
  f_mZ(Cofactor);

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


Exemple de sortie écran :
 A :

   +1  +2i    +3  +4i    +5  +6i 
   +5  +4i    +1  +3i    +6  +8i 
   +7  +2i    +5  +1i    +1  +1i 

 Cofactor :

  -24 -42i   +25 +59i   +20  +2i 
  +20 +28i   -24 -49i   +10 +23i 
   -1 +27i   +11 +30i    -4 -27i 

 Press return to continue.