mapper_nodes_elems

 MAPPER_ELEMS_NODES: calculates mapping function taking elems to nodes
 EtoN= mapper_elems_nodes(fwd_model)
 EtoN is a matrix [Nnodes x Nelems]
    where [EtoN]_ij = 1/3 if elem_j shares node_i

0001 function EtoN= mapper_elems_nodes(fwd_model)
0002 % MAPPER_ELEMS_NODES: calculates mapping function taking elems to nodes
0003 % EtoN= mapper_elems_nodes(fwd_model)
0004 % EtoN is a matrix [Nnodes x Nelems]
0005 %    where [EtoN]_ij = 1/3 if elem_j shares node_i
0006 
0007 warning('EIDORS:deprecated','MAPPER_ELEMS_NODES is deprecated as of 27-Jun-2012.');
0008 
0009 elems= fwd_model.elems;
0010 n_elems= size(elems,1);
0011 n_dimp1= size(elems,2);
0012 n_nodes= size(fwd_model.nodes,1);
0013 EtoN = sparse(elems, (1:n_elems)'*ones(1,n_dimp1), 1/3, n_nodes, n_elems);