7071     PetscScalar *dbg_work = NULL;  in PCBDDCConstraintsSetUp()  local
7170 …Call(PetscMalloc1(max_size_of_constraint * (max_constraints + max_size_of_constraint), &dbg_work));  in PCBDDCConstraintsSetUp()
7193 …if (pcbddc->dbg_flag) PetscCall(PetscArraycpy(dbg_work, &constraints_data[constraints_data_ptr[tot…  in PCBDDCConstraintsSetUp()
7271 …mm_("T", "N", &Blas_M, &Blas_N, &Blas_K, &one, dbg_work, &Blas_LDA, qr_basis, &Blas_LDB, &zero, &d…  in PCBDDCConstraintsSetUp()
7275 …if (ii != jj && PetscAbsScalar(dbg_work[size_of_constraint * primal_dofs + jj * primal_dofs + ii])…  in PCBDDCConstraintsSetUp()
7276 …if (ii == jj && PetscAbsScalar(dbg_work[size_of_constraint * primal_dofs + jj * primal_dofs + ii] …  in PCBDDCConstraintsSetUp()
7283 …if (ii != jj && PetscAbsScalar(dbg_work[size_of_constraint * primal_dofs + jj * primal_dofs + ii])…  in PCBDDCConstraintsSetUp()
7284 …nstraint %" PetscInt_FMT " (%1.14e)!\n", jj, ii, (double)PetscAbsScalar(dbg_work[size_of_constrain…  in PCBDDCConstraintsSetUp()
7286 …if (ii == jj && PetscAbsScalar(dbg_work[size_of_constraint * primal_dofs + jj * primal_dofs + ii] …  in PCBDDCConstraintsSetUp()
7287 …nstraint %" PetscInt_FMT " (%1.14e)!\n", jj, ii, (double)PetscAbsScalar(dbg_work[size_of_constrain…  in PCBDDCConstraintsSetUp()
7329       if (pcbddc->dbg_flag) PetscCall(PetscFree(dbg_work));  in PCBDDCConstraintsSetUp()