Lines Matching +full:- +full:a
1 // Copyright (c) 2017-2026, Lawrence Livermore National Security, LLC and other CEED contributors.
2 // All Rights Reserved. See the top-level LICENSE and NOTICE files for details.
4 // SPDX-License-Identifier: BSD-2-Clause
10 #include "ex-common.h"
12 /// libCEED Q-function for building quadrature data for a mass + diffusion operator
22 switch (build_data->dim + 10 * build_data->space_dim) { in build_mass_diff()
38 // J: 0 2 q_data: 0 2 adj(J): J22 -J12 in build_mass_diff()
39 // 1 3 2 1 -J10 J00 in build_mass_diff()
44 const CeedScalar qw = w[i] / (J00 * J11 - J10 * J01); in build_mass_diff()
47 q_data[0][i] = w[i] * (J00 * J11 - J10 * J01); in build_mass_diff()
52 q_data[3][i] = -qw * (J00 * J01 + J10 * J11); in build_mass_diff()
60 CeedScalar A[3][3]; in build_mass_diff() local
63 A[k][j] = in build_mass_diff()
64 …J[(k + 1) % 3][(j + 1) % 3][i] * J[(k + 2) % 3][(j + 2) % 3][i] - J[(k + 2) % 3][(j + 1) % 3][i] *… in build_mass_diff()
69 … const CeedScalar qw = w[i] / (J[0][0][i] * A[0][0] + J[0][1][i] * A[0][1] + J[0][2][i] * A[0][2]); in build_mass_diff()
72 q_data[0][i] = w[i] * (J[0][0][i] * A[0][0] + J[0][1][i] * A[0][1] + J[0][2][i] * A[0][2]); in build_mass_diff()
79 q_data[1][i] = qw * (A[0][0] * A[0][0] + A[0][1] * A[0][1] + A[0][2] * A[0][2]); in build_mass_diff()
80 q_data[2][i] = qw * (A[1][0] * A[1][0] + A[1][1] * A[1][1] + A[1][2] * A[1][2]); in build_mass_diff()
81 q_data[3][i] = qw * (A[2][0] * A[2][0] + A[2][1] * A[2][1] + A[2][2] * A[2][2]); in build_mass_diff()
82 q_data[4][i] = qw * (A[1][0] * A[2][0] + A[1][1] * A[2][1] + A[1][2] * A[2][2]); in build_mass_diff()
83 q_data[5][i] = qw * (A[0][0] * A[2][0] + A[0][1] * A[2][1] + A[0][2] * A[2][2]); in build_mass_diff()
84 q_data[6][i] = qw * (A[0][0] * A[1][0] + A[0][1] * A[1][1] + A[0][2] * A[1][2]); in build_mass_diff()
91 /// libCEED Q-function for applying a mass + diffusion operator
99 switch (build_data->dim) { in apply_mass_diff()