Searched refs:Hdel (Results 1 – 2 of 2) sorted by relevance
24 PetscReal *Hdel; /* mxnxn */ member
277 for (i = 0; i < mfqP->n * mfqP->n * mfqP->m; i++) mfqP->Hdel[i] = 0; in getquadpounders()318 mfqP->Hdel[(i * mfqP->n + i) * mfqP->m + k] = mfqP->beta[num]; in getquadpounders()322 mfqP->Hdel[(j * mfqP->n + i) * mfqP->m + k] = mfqP->beta[num] / sqrt2; in getquadpounders()323 mfqP->Hdel[(i * mfqP->n + j) * mfqP->m + k] = mfqP->beta[num] / sqrt2; in getquadpounders()879 PetscCallBLAS("BLASaxpy", BLASaxpy_(&iblas, &one, mfqP->Hdel, &ione, mfqP->H, &ione)); in TaoSolve_POUNDERS()981 PetscCall(PetscMalloc1(mfqP->n * mfqP->n * mfqP->m, &mfqP->Hdel)); in TaoSetUp_POUNDERS()1093 PetscCall(PetscFree(mfqP->Hdel)); in TaoDestroy_POUNDERS()