Installer ce fichier dans votre répertoire de travail.

vpfm.h
'
/* ------------------------------------ */
/*  Save as :   vpfm.h                  */
/* ------------------------------------ */
double **fp_mR(
double **A,
char MatrixName[],
int er,
int dr,
int n
)
{
FILE * fp = fopen("aamatrix.txt","a");
 
int r;
int c;
int n_c = C1;
int n_c_LAST;
int n_c_FIRST;
 
fprintf(fp,"%s",MatrixName);
 
while(n_c<A[C_SIZE][C0])
     {
      n_c+=n;
                           n_c_FIRST = n_c-n;
      if(n_c<A[C_SIZE][C0])n_c_LAST  = n_c;
      else                 n_c_LAST  = A[C_SIZE][C0];
 
          for(r=R1; r<A[R_SIZE][C0]; r++)
         {
          fprintf(fp,"\n");
              for (c=n_c_FIRST; c<n_c_LAST; c++)
               fprintf(fp,"%+*.*f ",er,dr,A[r][c]);
          }
      fprintf(fp,"\n");
     }
fprintf(fp,"\n");
 
fclose(fp);
 
return(A);
}
/* ------------------------------------ */
double **fpE_mR(
double **A,
char MatrixName[],
int er,
int dr,
int n
)
{
FILE * fp = fopen("aamatrix.txt","a");
 
int r;
int c;
int n_c = C1;
int n_c_LAST;
int n_c_FIRST;
 
fprintf(fp,"%s",MatrixName);
 
while(n_c<A[C_SIZE][C0])
     {
      n_c+=n;
                           n_c_FIRST = n_c-n;
      if(n_c<A[C_SIZE][C0])n_c_LAST  = n_c;
      else                 n_c_LAST  = A[C_SIZE][C0];
 
          for(r=R1; r<A[R_SIZE][C0]; r++)
         {
          fprintf(fp,"\n");
              for (c=n_c_FIRST; c<n_c_LAST; c++)
               fprintf(fp,"%+*.*e ",er,dr,A[r][c]);
          }
      fprintf(fp,"\n");
     }
fprintf(fp,"\n");
 
fclose(fp);
 
return(A);
}
/* ------------------------------------ */
/* ------------------------------------ */


Ces fonctions permettent d'imprimer une matrice dans un fichier.

On peut contrôler la taille des colonnes, le nombre de chiffres après la virgule, le nombre de colonnes par ligne.

Cet article est issu de Wikibooks. Le texte est sous licence Creative Commons - Attribution - Partage dans les Mêmes. Des conditions supplémentaires peuvent s'appliquer aux fichiers multimédias.