plot_elementnumbering

PURPOSE ^

PLOT_ELEMENTNUMBERING - plot element numbering

SYNOPSIS ^

function plot_elementnumbering(md,options_structure,width,i);

DESCRIPTION ^

PLOT_ELEMENTNUMBERING - plot element numbering

   Usage:
      plot_elementnumbering(md,options_structure,width,i);

   See also: PLOTMODEL

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function plot_elementnumbering(md,options_structure,width,i);
0002 %PLOT_ELEMENTNUMBERING - plot element numbering
0003 %
0004 %   Usage:
0005 %      plot_elementnumbering(md,options_structure,width,i);
0006 %
0007 %   See also: PLOTMODEL
0008 
0009 subplot(width,width,i); 
0010 
0011 %process data and model
0012 [x y z elements is2d]=processmesh(md,options_structure);
0013 [elementnumbers isgrid]=processdata(md,[1:md.numberofelements]',options_structure);
0014 
0015 %plot
0016 if is2d
0017     %plot mesh
0018     A=elements(:,1); B=elements(:,2); C=elements(:,3);
0019     patch( 'Faces', [A B C], 'Vertices', [x y z],'FaceVertexCData', [1 1 1],'FaceColor','none','EdgeColor','black');
0020     for i=1:size(elements,1),
0021         text(sum(x(elements(i,:)))/3,sum(y(elements(i,:)))/3,sum(z(elements(i,:)))/3,num2str(elementnumbers(i)));
0022         if ~isnan(options_structure.highlight) & ismember(elementnumbers(i),options_structure.highlight)
0023             A=elements(i,1); B=elements(i,2);  C=elements(i,3);
0024             patch( 'Faces', [A B C], 'Vertices', [x y z],'FaceVertexCData', [0.9 0.5 0.5],'FaceColor','flat','EdgeColor','black');
0025         end
0026     end
0027 else
0028     %plot mesh
0029     A=elements(:,1); B=elements(:,2); C=elements(:,3); D=elements(:,4); E=elements(:,5); F=elements(:,6);
0030     patch( 'Faces', [A B C], 'Vertices', [x y z],'FaceVertexCData', [1 1 1],'FaceColor','none','EdgeColor','black');
0031     patch( 'Faces', [D E F], 'Vertices', [x y z],'FaceVertexCData', [1 1 1],'FaceColor','none','EdgeColor','black');
0032     patch( 'Faces', [A B E D], 'Vertices', [x y z],'FaceVertexCData', [1 1 1],'FaceColor','none','EdgeColor','black');
0033     patch( 'Faces', [B E F C ], 'Vertices', [x y z],'FaceVertexCData', [1 1 1],'FaceColor','none','EdgeColor','black');
0034     patch( 'Faces', [C A D F ], 'Vertices', [x y z],'FaceVertexCData', [1 1 1],'FaceColor','none','EdgeColor','black');
0035     for i=1:size(elements,1),
0036         text(sum(x(elements(i,:)))/6,sum(y(elements(i,:)))/6,sum(z(elements(i,:)))/6,num2str(elementnumbers(i)));
0037         if ~isnan(options_structure.highlight) & ismember(elementnumbers(i),options_structure.highlight)
0038             A=elements(i,1); B=elements(i,2);  C=elements(i,3);  D=elements(i,4); E=elements(i,5);  F=elements(i,6);
0039             patch( 'Faces', [A B C], 'Vertices', [x y z],'FaceVertexCData', [0.9 0.5 0.5],'FaceColor','flat','EdgeColor','black');
0040             patch( 'Faces', [D E F], 'Vertices', [x y z],'FaceVertexCData', [0.9 0.5 0.5],'FaceColor','flat','EdgeColor','black');
0041             patch( 'Faces', [A B E D], 'Vertices', [x y z],'FaceVertexCData', [0.9 0.5 0.5],'FaceColor','flat','EdgeColor','black');
0042             patch( 'Faces', [B E F C ], 'Vertices', [x y z],'FaceVertexCData', [0.9 0.5 0.5],'FaceColor','flat','EdgeColor','black');
0043             patch( 'Faces', [C A D F ], 'Vertices', [x y z],'FaceVertexCData', [0.9 0.5 0.5],'FaceColor','flat','EdgeColor','black');
0044         end
0045     end
0046 end
0047 
0048 %apply options
0049 if isnan(options_structure.title)
0050     options_structure.title='Element numbering';
0051 end
0052 if isnan(options_structure.colorbar)
0053     options_structure.colorbar=0;
0054 end
0055 applyoptions(md,[],options_structure);

Generated on Sun 29-Mar-2009 20:22:55 by m2html © 2003