| /libCEED/examples/ceed/ |
| H A D | ex1-volume-f.f90 | 95 integer scalar_size local
108 scalar_size = 1
113 scalar_size = scalar_size*nd(i)
115 mesh_size = scalar_size*num_comp
147 …call ceedelemrestrictioncreate(ceed, num_elem, num_nodes, num_comp, scalar_size, mesh_size, ceed_m…
161 integer mesh_size, scalar_size local
172 scalar_size = mesh_size/fe_dim
175 do i = 1, scalar_size
181 do i = 1, scalar_size
183 v = m_pi_2 * coords(i + scalar_size)
[all …]
|
| H A D | ex2-surface.c | 343 CeedInt nd[3], num_elem = 1, scalar_size = 1; in BuildCartesianRestriction() local
348 scalar_size *= nd[d]; in BuildCartesianRestriction()
350 *size = scalar_size * num_comp; in BuildCartesianRestriction()
377 …ElemRestrictionCreate(ceed, num_elem, num_nodes, num_comp, scalar_size, num_comp * scalar_size, CE… in BuildCartesianRestriction()
391 CeedInt nd[3], scalar_size = 1; in SetCartesianMeshCoords() local
395 scalar_size *= nd[d]; in SetCartesianMeshCoords()
405 for (CeedInt gs_nodes = 0; gs_nodes < scalar_size; gs_nodes++) { in SetCartesianMeshCoords()
411 coords[gs_nodes + scalar_size * d] = ((d1d / (p - 1)) + nodes[d1d % (p - 1)]) / num_xyz[d]; in SetCartesianMeshCoords()
|
| H A D | ex3-volume.c | 312 CeedInt nd[3], num_elem = 1, scalar_size = 1; in BuildCartesianRestriction() local
317 scalar_size *= nd[d]; in BuildCartesianRestriction()
319 *size = scalar_size * num_comp; in BuildCartesianRestriction()
346 …ElemRestrictionCreate(ceed, num_elem, num_nodes, num_comp, scalar_size, num_comp * scalar_size, CE… in BuildCartesianRestriction()
358 CeedInt nd[3], scalar_size = 1; in SetCartesianMeshCoords() local
362 scalar_size *= nd[d]; in SetCartesianMeshCoords()
372 for (CeedInt gs_nodes = 0; gs_nodes < scalar_size; gs_nodes++) { in SetCartesianMeshCoords()
377 coords[gs_nodes + scalar_size * d] = ((d_1d / (p - 1)) + nodes[d_1d % (p - 1)]) / num_xyz[d]; in SetCartesianMeshCoords()
|
| H A D | ex1-volume.c | 323 CeedInt nd[3], num_elem = 1, scalar_size = 1; in BuildCartesianRestriction() local
328 scalar_size *= nd[d]; in BuildCartesianRestriction()
330 *size = scalar_size * num_comp; in BuildCartesianRestriction()
356 …ElemRestrictionCreate(ceed, num_elem, num_nodes, num_comp, scalar_size, num_comp * scalar_size, CE… in BuildCartesianRestriction()
367 CeedInt nd[3], scalar_size = 1; in SetCartesianMeshCoords() local
371 scalar_size *= nd[d]; in SetCartesianMeshCoords()
381 for (CeedInt gs_nodes = 0; gs_nodes < scalar_size; gs_nodes++) { in SetCartesianMeshCoords()
387 coords[gs_nodes + scalar_size * d] = ((d_1d / (p - 1)) + nodes[d_1d % (p - 1)]) / num_xyz[d]; in SetCartesianMeshCoords()
|
| /libCEED/examples/rust/mesh/src/ |
| H A D | lib.rs | 59 let mut scalar_size = 1; localVariable
63 scalar_size *= num_d[d];
96 scalar_size,
97 num_comp * scalar_size,
125 let mut scalar_size = 1; localVariable
128 scalar_size *= num_d[d];
150 for gs_nodes in 0..scalar_size {
154 coords[gs_nodes + scalar_size * d] = ((d_1d / (p - 1)) as libceed::Scalar
|
| /libCEED/examples/python/ |
| H A D | ex_common.py | 114 scalar_size = 1
118 scalar_size *= nd[d]
120 size = scalar_size * num_comp
145 num_elem, num_nodes, num_comp, scalar_size, size, elem_nodes)
171 scalar_size = 1
174 scalar_size *= nd[d]
181 coords = np.zeros(scalar_size * dim)
182 for gs_node in range(scalar_size):
188 coords[gs_node + scalar_size * d] = (elem_id + nodes[node_id]) / num_xyz[d]
|
| /libCEED/julia/LibCEED.jl/examples/ |
| H A D | common.jl | 44 scalar_size::CeedInt = prod(nd)
45 size::CeedInt = scalar_size*ncomp
86 scalar_size,
87 ncomp*scalar_size,
108 scalar_size::CeedInt = prod(nd)
115 @inbounds @simd for gsnodes = 0:scalar_size-1
123 coords[gsnodes+scalar_size*(d-1)+1] = ((d1d÷p) + nodes[d1d%p+1])/nxyz[d]
|
| H A D | ex1-volume-c.jl | 98 scalar_size = 1
102 scalar_size = prod(nd)
103 size = scalar_size*ncomp
136 scalar_size,
137 ncomp*scalar_size,
164 scalar_size = prod(nd)
168 coords = unsafe_wrap(Array, coords_ref[], scalar_size*dim)
174 for gsnodes = 0:(scalar_size-1)
178 coords[gsnodes+scalar_size*(d-1)+1] = (div(d1d, p) + nodes[d1d%p+1])/nxyz[d]
|
| /libCEED/examples/rust-qfunctions/ |
| H A D | ex1-volume.c | 333 CeedInt nd[3], num_elem = 1, scalar_size = 1; in BuildCartesianRestriction() local
338 scalar_size *= nd[d]; in BuildCartesianRestriction()
340 *size = scalar_size * num_comp; in BuildCartesianRestriction()
366 …ElemRestrictionCreate(ceed, num_elem, num_nodes, num_comp, scalar_size, num_comp * scalar_size, CE… in BuildCartesianRestriction()
377 CeedInt nd[3], scalar_size = 1; in SetCartesianMeshCoords() local
381 scalar_size *= nd[d]; in SetCartesianMeshCoords()
391 for (CeedInt gs_nodes = 0; gs_nodes < scalar_size; gs_nodes++) { in SetCartesianMeshCoords()
397 coords[gs_nodes + scalar_size * d] = ((d_1d / (p - 1)) + nodes[d_1d % (p - 1)]) / num_xyz[d]; in SetCartesianMeshCoords()
|