Searched refs:Mpos (Results 1 – 1 of 1) sorted by relevance
1034 static PetscErrorCode LAPACKsyevFail(PetscInt dim, PetscScalar Mpos[]) in LAPACKsyevFail() argument1044 … 1) PetscCall(PetscPrintf(PETSC_COMM_SELF, "%15.8e, ", (double)PetscAbsScalar(Mpos[i * dim + j]))); in LAPACKsyevFail()1045 … else PetscCall(PetscPrintf(PETSC_COMM_SELF, "%15.8e", (double)PetscAbsScalar(Mpos[i * dim + j]))); in LAPACKsyevFail()1057 PetscScalar *Mpos; in DMPlexMetricModify_Private() local1060 PetscCall(PetscMalloc2(dim * dim, &Mpos, dim, &eigs)); in DMPlexMetricModify_Private()1064 Mpos[i * dim + i] = Mp[i * dim + i]; in DMPlexMetricModify_Private()1066 Mpos[i * dim + j] = 0.5 * (Mp[i * dim + j] + Mp[j * dim + i]); in DMPlexMetricModify_Private()1067 Mpos[j * dim + i] = Mpos[i * dim + j]; in DMPlexMetricModify_Private()1074 eigs[0] = PetscRealPart(Mpos[0]); in DMPlexMetricModify_Private()1075 Mpos[0] = 1.0; in DMPlexMetricModify_Private()[all …]