Searched refs:pcontrib (Results 1 – 1 of 1) sorted by relevance
567 PetscScalar *pcontrib, *pvcol; in PCGAMGProlongator_Classical_Standard() local599 PetscCall(PetscMalloc3(fn, &lsparse, fn, &gsparse, nl, &pcontrib)); in PCGAMGProlongator_Classical_Standard()631 pcontrib[i] = 0.; in PCGAMGProlongator_Classical_Standard()643 pcontrib[icol[j]] = 1.; in PCGAMGProlongator_Classical_Standard()649 if (lcid[icol[k]] >= 0) pcontrib[icol[k]] = 1.; in PCGAMGProlongator_Classical_Standard()656 if (lcid[icol[j]] >= 0 && pcontrib[icol[j]] != 0.) { in PCGAMGProlongator_Classical_Standard()663 pcontrib[icol[j]] = 0.; in PCGAMGProlongator_Classical_Standard()669 if (lcid[icol[k]] >= 0 && pcontrib[icol[k]] != 0.) { in PCGAMGProlongator_Classical_Standard()676 pcontrib[icol[k]] = 0.; in PCGAMGProlongator_Classical_Standard()710 pcontrib[icol[j]] += pentry; in PCGAMGProlongator_Classical_Standard()[all …]