1 function p = fem_plot_dofmap(df,params)
2 %
function p = fem_plot_dofmap(df,params)
4 %
function plotting the numbers of the dofs
for optical consistency
7 % B. Haasdonk 12.1.2011
11 lagrange_nodes = lagrange_nodes_lcoord(df.pdeg);
12 for li = 1:size(lagrange_nodes,1);
13 clocal = repmat([1/3,1/3],size(lagrange_nodes,1),1);
14 % shrink location a bit towards center
for readability;
15 local = (lagrange_nodes - clocal)*0.8 + clocal;
16 glob = local2global(df.grid,1:df.grid.nelements,local(li,:));
17 nums = num2str(df.global_dof_index(:,li));
18 p2 = text(glob(:,1),glob(:,2),nums,
'Fontsize',5);