Fast Auxiliary Space Preconditioning 2.7.7 Aug/28/2022
Loading...
Searching...
No Matches
BlaSparseBLC.c
Go to the documentation of this file.
1
14#include <time.h>
15
16#ifdef _OPENMP
17#include <omp.h>
18#endif
19
20#include "fasp.h"
21#include "fasp_block.h"
22#include "fasp_functs.h"
23
24/*---------------------------------*/
25/*-- Public Functions --*/
26/*---------------------------------*/
27
39{
40 INT i;
41 INT num_blocks = (A->brow)*(A->bcol);
42
43 if (A == NULL) return; // Nothing need to be freed!
44
45 for ( i=0; i<num_blocks; i++ ) {
47 A->blocks[i] = NULL;
48 }
49
50 fasp_mem_free(A->blocks); A->blocks = NULL;
51}
52
53/*---------------------------------*/
54/*-- End of File --*/
55/*---------------------------------*/
void fasp_mem_free(void *mem)
Free up previous allocated memory body and set pointer to NULL.
Definition: AuxMemory.c:152
void fasp_dblc_free(dBLCmat *A)
Free block CSR sparse matrix data memory space.
Definition: BlaSparseBLC.c:38
void fasp_dcsr_free(dCSRmat *A)
Free CSR sparse matrix data memory space.
Definition: BlaSparseCSR.c:184
Main header file for the FASP project.
#define INT
Definition: fasp.h:72
Header file for FASP block matrices.
Block REAL CSR matrix format.
Definition: fasp_block.h:74
INT brow
row number of blocks in A, m
Definition: fasp_block.h:77
dCSRmat ** blocks
blocks of dCSRmat, point to blocks[brow][bcol]
Definition: fasp_block.h:83
INT bcol
column number of blocks A, n
Definition: fasp_block.h:80