Lines Matching refs:ej
461 void FormElementJacobian(Field *ex, CoordField *ec, Field *ef, Field *eq, PetscScalar *ej, AppCtx *… in FormElementJacobian() argument
470 if (ej) in FormElementJacobian()
471 for (i = 0; i < NPB * NPB; i++) ej[i] = 0.; in FormElementJacobian()
523 if (ej) { in FormElementJacobian()
545 …ej[teidx + NPB * tridx] += scl * (lgrad[0] * dFS[3 * ll + 0] + lgrad[1] * dFS[3 * ll + 1] + lgrad[… in FormElementJacobian()
562 PetscInt ii, jj, kk, ll, ei, ej, ek, el; in ApplyBCsElement() local
569 for (ej = 0; ej < NB; ej++) { in ApplyBCsElement()
572 …if (OnBoundary(i + ii, j + jj, k + kk, mx, my, mz) || OnBoundary(i + ei, j + ej, k + ek, mx, my, m… in ApplyBCsElement()
573 PetscInt teidx = el + 3 * (ei + ej * NB + ek * NB * NB); in ApplyBCsElement()
596 PetscScalar ej[NPB * NPB]; in FormJacobianLocal() local
634 FormElementJacobian(ex, ec, NULL, NULL, ej, user); in FormJacobianLocal()
635 ApplyBCsElement(mx, my, mz, i, j, k, ej); in FormJacobianLocal()
651 for (l = 0; l < NPB; l++) vals[NPB * nrows + l] = ej[NPB * (3 * idx + m) + l]; in FormJacobianLocal()