Lines Matching refs:dim
8 static CeedScalar Eval(CeedInt dim, const CeedScalar x[]) { in Eval() argument
10 for (CeedInt d = 0; d < dim; d++) { in Eval()
21 for (CeedInt dim = 1; dim <= 3; dim++) { in main() local
24 CeedInt q = 11, q_dim = CeedIntPow(q, dim), x_dim = CeedIntPow(2, dim); in main()
26 CeedVectorCreate(ceed, x_dim * dim, &x); in main()
28 CeedScalar x_array[x_dim * dim]; in main()
30 for (CeedInt d = 0; d < dim; d++) { in main()
35 CeedVectorCreate(ceed, q_dim * dim, &x_q); in main()
41 CeedBasisCreateTensorH1Lagrange(ceed, dim, dim, 2, q, CEED_GAUSS_LOBATTO, &basis_x_lobatto); in main()
42 CeedBasisCreateTensorH1Lagrange(ceed, dim, 1, q, q, CEED_GAUSS_LOBATTO, &basis_u_lobatto); in main()
52 CeedScalar coord[dim]; in main()
53 for (CeedInt d = 0; d < dim; d++) coord[d] = x_q_array[d * q_dim + i]; in main()
54 u_q_array[i] = Eval(dim, coord); in main()
63 CeedBasisCreateTensorH1Lagrange(ceed, dim, dim, 2, q, CEED_GAUSS, &basis_x_gauss); in main()
64 CeedBasisCreateTensorH1Lagrange(ceed, dim, 1, q, q, CEED_GAUSS, &basis_u_gauss); in main()
75 CeedScalar coord[dim]; in main()
76 for (CeedInt d = 0; d < dim; d++) coord[d] = x_q_array[d * q_dim + i]; in main()
77 CeedScalar fx = Eval(dim, coord); in main()
80 printf("[%" CeedInt_FMT "] %f != %f = f(%f", dim, u_array[i], fx, coord[0]); in main()
81 for (CeedInt d = 1; d < dim; d++) printf(",%f", coord[d]); in main()