Searched refs:schur_factor (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/pc/impls/bddc/ |
| H A D | bddcschurs.c | 840 PetscScalar *work, *S_data, *schur_factor, infty = PETSC_MAX_REAL; in PCBDDCSubSchursSetUp() local
1588 schur_factor = NULL; in PCBDDCSubSchursSetUp()
1634 … PetscCall(PetscMalloc1((size_active_schur * (size_active_schur + 1)) / 2 + nd, &schur_factor)); in PCBDDCSubSchursSetUp()
1636 … PetscCall(PetscArraycpy(schur_factor + cum, tdata + i * (news + 1), size_active_schur - i)); in PCBDDCSubSchursSetUp()
1639 …for (i = 0; i < nd; i++) schur_factor[cum + i] = PetscSqrtReal(PetscRealPart(data[(i + size_active… in PCBDDCSubSchursSetUp()
1890 … PetscCall(PetscArraycpy(data + i * (size_schur + 1), schur_factor + cum, size_active_schur - i)); in PCBDDCSubSchursSetUp()
1894 PetscCall(PetscArraycpy(data, schur_factor, size_schur * size_schur)); in PCBDDCSubSchursSetUp()
1898 … for (i = 0; i < nd; i++) data[(i + size_active_schur) * (size_schur + 1)] = schur_factor[cum + i]; in PCBDDCSubSchursSetUp()
1925 PetscCall(PetscFree(schur_factor)); in PCBDDCSubSchursSetUp()
|