Searched refs:tmparr (Results 1 – 1 of 1) sorted by relevance
548 PetscScalar *Farr, *tmparr; in TaoSNESFunction_PDIPM_residual() local570 PetscCall(VecGetArrayWrite(pdipm->z, &tmparr)); in TaoSNESFunction_PDIPM_residual()571 for (i = 0; i < pdipm->nci; i++) tmparr[i] *= Xarr[pdipm->off_z + i]; in TaoSNESFunction_PDIPM_residual()572 PetscCall(VecRestoreArrayWrite(pdipm->z, &tmparr)); in TaoSNESFunction_PDIPM_residual()578 PetscCall(VecGetArrayWrite(pdipm->z, &tmparr)); in TaoSNESFunction_PDIPM_residual()579 for (i = 0; i < pdipm->nci; i++) tmparr[i] /= Xarr[pdipm->off_z + i]; in TaoSNESFunction_PDIPM_residual()580 PetscCall(VecRestoreArrayWrite(pdipm->z, &tmparr)); in TaoSNESFunction_PDIPM_residual()