Lines Matching refs:scalar_size
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)
186 coords(i + scalar_size) = u * sin(v)
205 integer scalar_size local
215 scalar_size = 1
219 scalar_size = scalar_size * nd(i)
222 coords_size = scalar_size * fe_dim
234 do i = 1, scalar_size
239 … coords(scalar_size * (j - 1) + i) = ((d_1d/(p - 1)) + nodes(mod(d_1d, p - 1) + 1))/num_xyz(j)