DVextr_cell_comp

Synopsis

extract one cell_data component from each Cell_Data cell_set

module DVextr_cell_comp {
Mesh+Cell_Data+Iparam &in {
xform+nonotify;
};
int+IPort2+nonotify comp;
int+nres+nonotify dim => in.ncell_sets;
group+nonotify out_data[dim] {
int+nres ncells => in.cell_set[index_of(out_data)].ncells;
int ncell_data=1;
group+nres &cell_data => {
in.cell_set[index_of(out_data)].cell_data[comp]};
};
group+nonotify out_sets[dim] {
group+nres &out_set => merge(out_data
[index_of(out_sets)],in.cell_set[index_of(out_sets)]);
};
Cells+Cell_Data+nonotify+write out_cd {
*cell_set[];
ncell_sets => array_size(cell_set);
};
Mesh+OPort2+nonotify &out =>merge(out_cd, in);
method+notify_val+notify_inst upd_extr_cell_comp