if ~isempty(neumann)
n = (coordinates(neumann(:,2),:) -coordinates(neumann(:,1),:))*[0,-1;1,0];
for j = 1:size(neumann,1);
J = 2*neumann(j,[1,1,2,2]) -[1,0,1,0];
gm = g(sum(coordinates(neumann(j,:),:))/2, n(j,:)/norm(n(j,:)))';
b(J) = b(J) +norm(n(j,:))*[gm;gm]/2;
end
end
matlab3.rar_matlab 三角网格_matlab界面设计_三角形优化_三角网格优化_三角网格划分
版权申诉
10 浏览量
2022-09-14
17:26:11
上传
评论
收藏 75KB RAR 举报
matlab3.rar （72个子文件） 
界面设计 
gpos.m 2KB topology.fig 5KB drawF.m 2KB top.m 5KB apply1_constrains.m 2KB topisn.m 230B
分布载荷.txt 308B apply2_forces.m 2KB checknew.m 932B topology.m 18KB figure1_WindowButtonMotionFcn.m 3KB topselected.m 227B select_nodes.m 2KB topology_WindowButtonUpFcn.m 506B patch3.m 718B topsna.m 786B 任意载荷.txt 113B figure1_WindowButtonUpFcn.m 506B 三角形网格 无接触 fem_lame2d.asv 3KB dirichlet.dat 16B aposteriori.m 2KB fem_lame2d.m 2KB elements3.dat 2KB bottom.dat 37B coordinates.dat 1KB neumann.dat 34B show.m 1KB g.m 594B stima3.m 877B avmatrix.m 2KB 三角形网格拓扑 top2007.asv 6KB dirichlet.dat 68B elements3.dat 5KB top2007.m 6KB top2008.m 5KB top2008.asv 5KB bottom.dat 33B l-shape top2007.asv 6KB dirichlet.dat 68B elements3.dat 5KB top2007.m 6KB top2008.m 5KB top2008.asv 5KB bottom.dat 20B coordinates.dat 3KB neumann.dat 31B show.m 1KB
l-shape.jpg 11KB bottom.asv 19B coordinates.dat 3KB neumann.dat 31B show.m 1KB 机翼 分布载荷.txt 308B dirichlet.dat 104B elements3.dat 12KB top2008.m 5KB bottom.dat 2B coordinates.dat 6KB neumann.dat 1B 任意载荷.txt 113B 接触求解 dirichlet.dat 45B aposteriori.m 2KB fem_lame2d.m 2KB elements3.dat 6KB bottom.dat 18B coordinates.dat 3KB neumann.dat 25B show.m 1KB g.m 594B stima3.m 877B f.m 434B avmatrix.m 2KB
weixin_42651887
- 粉丝: 79
- 资源: 1万+
评论0