femwind/plot_mesh_3d.m

   1 function plot_mesh_3d(X,bbox)
   2 if exist('bbox','var')
   3     for i=1:3
   4         X{i}=X{i}(bbox(1):bbox(2),bbox(3):bbox(4),bbox(5):bbox(6));
   5     end
   6 end
   7 [n(1),n(2),n(3)] = size(X{1});
   8
   9
  10 hold on
  11 for j=1:n(2)
  12     for k=1:n(3)
  13         plot3(X{1}(:,j,k),X{2}(:,j,k),X{3}(:,j,k),'color','b'),
  14     end
  15 end
  16 for i=1:n(1)
  17     for k=1:n(3)
  18         plot3(X{1}(i,:,k),X{2}(i,:,k),X{3}(i,:,k),'color','b'),
  19     end
  20 end
  21 %This creates a blue brick, and makes the meshgrid undetectable
  22 % for i=1:n(1)
  23 %     for j=1:n(2)
  24 %         plot3(squeeze(X{1}(i,j,:)),squeeze(X{2}(i,j,:)),squeeze(X{3}(i,j,:)),'color','b'),
  25 %     end
  26 % end
  27 hold off
  28 view(3)
  29 xlabel('x'), ylabel('y'), zlabel('z'),
  30 end