Mathc complexes/a124

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

	`c00a.c`

/* ------------------------------------ */
/*  Save as :   c00a.c                  */
/* ------------------------------------ */
#include "w_a.h"
/* ------------------------------------ */
#define RCA          RC3
/* ------------------------------------ */
void fun(void)
{
double **A;  
       
   clrscrn();
        
   A = rEcsymmetric_mZ(i_mZ(RCA,RCA),999,+1.E-3);
  
  clrscrn();
  printf(" A :");
  p_mZ(A, S9,P4, S8,P4, C6); 
       
   f_mZ(A);
}
/* ------------------------------------ */
int main(void)
{
time_t t;

  srand(time(&t));

do
{
    fun();
    
} while(stop_w());

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

    Matrices symétriques conjugués avec des valeurs à virgules

Exemple de sortie écran :

 -------------------------------
 A :
  +2.6536 +0.0000i   -0.9190 -1.6243i   +1.2004 +0.5189i 
  -0.9190 +1.6243i   +2.8837 +0.0000i   +0.0039 +0.1693i 
  +1.2004 -0.5189i   +0.0039 -0.1693i   +2.3150 +0.0000i 


 Press return to continue
 Press X      to stop