Searched refs:o_flip (Results 1 – 1 of 1) sorted by relevance
669 PetscScalar *o_flip; in PetscDualSpaceGetSymmetries_Sum() local671 PetscCall(PetscMalloc1(spintdim, &o_flip)); in PetscDualSpaceGetSymmetries_Sum()672 for (PetscInt i = 0; i < spintdim; i++) o_flip[i] = 1.0; in PetscDualSpaceGetSymmetries_Sum()689 … for (PetscInt i = 0; i < subspdim; i++) o_flip[domain_mapped[i]] = sub_perms[0][o][i]; in PetscDualSpaceGetSymmetries_Sum()693 symflips[0][o] = o_flip; in PetscDualSpaceGetSymmetries_Sum()