Searched refs:mb (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | fillsparse.c | 25 double* mb = (double*) malloc(sizeof(double)*nshl*nshl); //block to insert in fillsparsecpetscs() local
34 mb[nshl*i + j] = EGmass[e + npro*(i + nshl*j)]; in fillsparsecpetscs()
40 MatSetValues(*lhsP, petsc_nshl , locat, petsc_nshl, locat, mb, ADD_VALUES); in fillsparsecpetscs()
42 free(mb); in fillsparsecpetscs()
50 double* mb = (double*) malloc(sizeof(double)*nedof*nedof); //block to insert in fillsparsecpetscc() local
60 mb[nedof*i + j] = EGmass[e + npro*(i + nedof*j)]; in fillsparsecpetscc()
66 MatSetValuesBlocked(*lhsP, petsc_nshl , locat, petsc_nshl, locat, mb, ADD_VALUES); in fillsparsecpetscc()
68 free(mb); in fillsparsecpetscc()
|