Lines Matching +full:- +full:r
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
16 // -----------------------------------------------------------------------------
18 // -----------------------------------------------------------------------------
27 const CeedScalar R = context[0]; in SetupDiffRhs3() local
35 x *= R / rad; in SetupDiffRhs3()
36 y *= R / rad; in SetupDiffRhs3()
37 z *= R / rad; in SetupDiffRhs3()
39 const CeedScalar theta = asin(z / R); // latitude in SetupDiffRhs3()
51 rhs[i + 0 * Q] = q_data[i + Q * 0] * 2 * sin(lambda) * cos(theta) / (R * R); in SetupDiffRhs3()
61 // -----------------------------------------------------------------------------
65 // ug - Input vector Jacobian at quadrature points
66 // q_data - Geometric factors
69 // vJ - Output vector (test functions) Jacobian at quadrature points
70 // -----------------------------------------------------------------------------
85 // -- Grad-to-Grad q_data in Diff3()
86 // ---- dXdx_j,k * dXdx_k,j in Diff3()
101 // -----------------------------------------------------------------------------