#include "SparseMatrices.h"

void WriteSparseMatrix(char FileName[], sMat *A){
	FILE 	*FilePointer;
	int 	m,n,i,k,nz,*jp;
	float 	*fp;
	sRow	*rp;

	// File OPS and header
	FilePointer = fopen(FileName,"w");
	m = A->m;
	n = A->n;
	fprintf(FilePointer,"5903SparseMatrix\n%i\t%i\tfloat\n",m,n);
	
	// writing the data
	rp = A->sRow;
	for(i=0;i<m;i++){
		nz = rp->nz;
		jp = rp->j;
		fp = rp->f;
	 	// Writing row i
	 	for(k=0;k<nz;k++){
	 		fprintf(FilePointer,"%i\t%i\t%f\n",i, *(jp + k), *(fp + k));
	  		};
	  	rp++;
	 	};
	fclose(FilePointer);
}