hypre_DistributedMatrix * hypre_DistributedMatrixCreate( MPI_Comm context ) { hypre_DistributedMatrix *matrix; matrix = hypre_CTAlloc(hypre_DistributedMatrix, 1); hypre_DistributedMatrixContext(matrix) = context; hypre_DistributedMatrixM(matrix) = -1; hypre_DistributedMatrixN(matrix) = -1; hypre_DistributedMatrixAuxiliaryData(matrix) = NULL; hypre_DistributedMatrixLocalStorage(matrix) = NULL; hypre_DistributedMatrixTranslator(matrix) = NULL; hypre_DistributedMatrixLocalStorageType(matrix) = HYPRE_UNITIALIZED; #ifdef HYPRE_TIMING matrix->GetRow_timer = hypre_InitializeTiming( "GetRow" ); #endif return matrix; }
MPI_Comm HYPRE_DistributedMatrixGetContext( HYPRE_DistributedMatrix matrix ) { return( hypre_DistributedMatrixContext( (hypre_DistributedMatrix *) matrix ) ); }