KNLanczosTest.cpp File Reference

#include "stdafx.h"
#include <math.h>
#include <sys/stat.h>
#include <sys/types.h>
#include "CKNGlobal.h"
#include "KNLanczosTest.h"
#include "KNLanczosMethod.h"
#include "KNMatrixDebug.h"
#include "KNMPIManager.h"
#include "KNTimeMeasurement.h"
#include <algorithm>
#include <mpi.h>

Include dependency graph for KNLanczosTest.cpp:

Go to the source code of this file.

Classes
struct	_tag

Macros
#define	TEMP_MATRIX_ORDER   2000
#define	LARGE_MATRIX_READ_COUNT   44002932
#define	LARGE_MATRIX_ORDER   1105920
#define	MATLAB_SEORTH_RESULT_FILE   "./data/sereoth.dat"
#define	LARGE_SIZE_MATRIX_FILE   "./data/Hamiltonian_sort1.dat"

Typedefs
typedef struct _tag	LANCZOS_PARAM
typedef struct _tag *	LPLANCZOS_PARAM

Functions
void	DumpResult (CKNLanczosMethod::LPEIGENVALUE_RESULT *pResult)

Macro Definition Documentation

#define LARGE_MATRIX_ORDER   1105920

Definition at line 22 of file KNLanczosTest.cpp.

Referenced by CKNLanczosTest::LargeCSRBuildingViaFileForMPI().

#define LARGE_MATRIX_READ_COUNT   44002932

Definition at line 21 of file KNLanczosTest.cpp.

Referenced by CKNLanczosTest::LargeCSRBuildingViaFileForMPI().

#define LARGE_SIZE_MATRIX_FILE   "./data/Hamiltonian_sort1.dat"

Definition at line 28 of file KNLanczosTest.cpp.

Referenced by CKNLanczosTest::LargeSizeMatrixMPI(), and CKNLanczosTest::SolvingLargeSizeHamlitonian().

#define MATLAB_SEORTH_RESULT_FILE   "./data/sereoth.dat"

Definition at line 27 of file KNLanczosTest.cpp.

Referenced by CKNLanczosTest::AuditResult_Seorth().

#define TEMP_MATRIX_ORDER   2000

Definition at line 20 of file KNLanczosTest.cpp.

Typedef Documentation

typedef struct _tag LANCZOS_PARAM

typedef struct _tag * LPLANCZOS_PARAM

Function Documentation

void DumpResult

(

CKNLanczosMethod::LPEIGENVALUE_RESULT *

pResult

)

Definition at line 729 of file KNLanczosTest.cpp.

References CKNLanczosMethod::EIGENVALUE_RESULT::nEigenValueCount.

{
    unsigned int    i, j;
    FILE            *fpMatlabResult;

    if (NULL != (fpMatlabResult = fopen("./data/Lanczosresult.csv", "at")))
    {

        for (i = 1; i <= 41; i++)
        {
            char        szBuffer[1000000] = "";

            if (NULL == pResult[i])
                continue;

            for (j = 0; j < pResult[i]->nEigenValueCount; j++)
            {
                sprintf(szBuffer, "%s,%20.20f", szBuffer, pResult[i]->pEigenValues[j]);
            }

            strcat(szBuffer, "\n");
            fputs(szBuffer, fpMatlabResult);

        }

        fclose(fpMatlabResult);
    }
}