Mathc complexes/Fichiers c : fp e mz

Un livre de Wikilivres.
Sauter à la navigation Sauter à la recherche


Installer et compiler ce fichier dans votre répertoire de travail.

Crystal Clear mimetype source c.png fpe_mz.c
'
/* ------------------------------------ */
/*  Save as :   fpe_mz.c                 */
/* ------------------------------------ */
#include "w_a.h"
/* ------------------------------------ */
void fun(int r,int c)
{
double **A   = rE_mZ(i_mZ(r,c), 99, 1E-3 );
double **B   = rE_mZ(i_mZ(r,c), 99, 1E-3 );
double **AplsB =     i_mZ(r,c);

  clrscrn();

  printf(" See the file \"aamatrix.txt\" \n\n");
  
  fpE_mZ(A,"\n\n\n\nA :", 12,3, 11,3, C3);
  fpE_mZ(B,        "B :", 12,3, 11,3, C3);
  
  fpE_mZ(add_mZ(A,B,AplsB),"AplsB :",12,3, 11,3, C3);
  
  f_mZ(A);
  f_mZ(B);
  f_mZ(AplsB);
}
/* ------------------------------------ */
int main(void)
{
time_t t;

  srand(time(&t));
  
   do 
        fun(rp_I(R4),rp_I(C3));
        
    while(stop_w());
        
  return 0;
}


La fonction fpE_mZ(); est identique à la fonction pE_mZ(); mais elle écrit les nombres dans un fichier texte (aamatrix.txt).

Le nom du fichier a été choisi pour être parmi les premiers de la liste dans votre répertoire.

Les additions de matrices s'ajoute les unes après les autres grace à la commande "a".

Vous pourriez bien entendu les afficher aussi à l'écran.

FILE * fp = fopen("aamatrix.txt","a");


Exemple de sortie écran :

A :
  -6.300e-02 -6.700e-02i 
  +9.800e-02 +8.600e-02i 
  -3.500e-02 +2.800e-02i 

B :
  -6.100e-02 -7.300e-02i 
  -9.000e-03 -2.900e-02i 
  -3.300e-02 -2.500e-02i 

AplsB :
  -1.240e-01 -1.400e-01i 
  +8.900e-02 +5.700e-02i 
  -6.800e-02 +3.000e-03i 





A :
  +8.000e-02 +1.600e-02i   -5.000e-03 -6.500e-02i 
  -9.900e-02 -6.100e-02i   +1.600e-02 +3.200e-02i 

B :
  -6.300e-02 +8.200e-02i   -9.700e-02 -4.700e-02i 
  -5.000e-03 +2.800e-02i   -1.900e-02 +2.600e-02i 

AplsB :
  +1.700e-02 +9.800e-02i   -1.020e-01 -1.120e-01i 
  -1.040e-01 -3.300e-02i   -3.000e-03 +5.800e-02i