pub fn create<T: RlstScalar + Getrf + Getri, TGeo: RlstScalar>(
cell_type: ReferenceCellType,
degree: usize,
continuity: Continuity,
) -> CiarletElement<T, CovariantPiolaMap, TGeo>Expand description
Create a Nedelec (first kind) element
Examples found in repository?
ndgrid/examples/test_push_forward.rs (line 147)
137fn test_nc_push_forward() {
138 let mut b = SingleElementGridBuilder::<f64>::new(3, (ReferenceCellType::Triangle, 1));
139 b.add_point(0, &[0.0, 0.0, 0.0]);
140 b.add_point(1, &[1.0, 0.0, 0.0]);
141 b.add_point(2, &[2.0, 0.0, 1.0]);
142 b.add_point(3, &[0.0, 1.0, 0.0]);
143 b.add_cell(0, &[0, 1, 3]);
144 b.add_cell(1, &[1, 2, 3]);
145 let grid = b.create_grid();
146
147 let e = nedelec::create::<f64, f64>(ReferenceCellType::Triangle, 4, Continuity::Standard);
148
149 let npts = 5;
150
151 let mut cell0_points = rlst_dynamic_array!(f64, [2, npts]);
152 for i in 0..npts {
153 cell0_points[[1, i]] = i as f64 / (npts - 1) as f64;
154 cell0_points[[0, i]] = 1.0 - cell0_points[[1, i]];
155 }
156 let mut cell0_table = DynArray::<f64, 4>::from_shape(e.tabulate_array_shape(0, npts));
157 e.tabulate(&cell0_points, 0, &mut cell0_table);
158
159 let mut points = rlst_dynamic_array!(f64, [2, npts]);
160 for i in 0..npts {
161 points[[0, i]] = 0.0;
162 points[[1, i]] = i as f64 / (npts - 1) as f64;
163 }
164
165 let mut table = DynArray::<f64, 4>::from_shape(e.tabulate_array_shape(0, npts));
166 e.tabulate(&points, 0, &mut table);
167
168 let gmap = grid.geometry_map(ReferenceCellType::Triangle, 1, &points);
169
170 let mut jacobians = rlst_dynamic_array!(f64, [grid.geometry_dim(), grid.topology_dim(), npts]);
171 let mut jinv = rlst_dynamic_array!(f64, [grid.topology_dim(), grid.geometry_dim(), npts]);
172 let mut jdets = vec![0.0; npts];
173
174 gmap.jacobians_inverses_dets(1, &mut jacobians, &mut jinv, &mut jdets);
175
176 let mut cell1_table =
177 DynArray::<f64, 4>::from_shape([table.shape()[0], table.shape()[1], table.shape()[2], 3]);
178 e.push_forward(&table, 0, &jacobians, &jdets, &jinv, &mut cell1_table);
179
180 // Check that basis functions dotted with tangent to edge are continuous between cells
181 for (cell0_dof, cell1_dof) in izip!(
182 e.entity_closure_dofs(1, 0).unwrap(),
183 e.entity_closure_dofs(1, 1).unwrap()
184 ) {
185 for i in 0..npts {
186 assert_relative_eq!(
187 (cell0_table[[0, i, *cell0_dof, 0]] - cell0_table[[0, i, *cell0_dof, 1]])
188 / f64::sqrt(2.0),
189 (cell1_table[[0, i, *cell1_dof, 0]] - cell1_table[[0, i, *cell1_dof, 1]])
190 / f64::sqrt(2.0),
191 epsilon = 1e-10
192 );
193 }
194 }
195}