文档介绍：/filname,large_disk,1 /title,large strain analysis of an axisymmetric disk *set,d,12 *set,l,3 ! 注意此处为 L ,不是一; /prep7 mp,ex,1,1000 mp,prxy,1, tb,biso,1,1,2 tbdata,,1, et,1,visco106 keyopt,1,3,1 ! 设置轴对称单元,利用对称性建模; rectng,0,d/2,0,l/2 ! 注意此处为 L/2 ,不是二分之一; lesize,1,,,12,,,,,1 lesize,2,,,5,,,,,1 mshkey,1 amesh,all nsel,s,loc,y, cp,1,uy,all ! 耦合图示节点 y 向自由度 nsel,all fini /solu anty,0 dl,1,,symm ! 在线 1、4 上施加对称约束; dl,4,,symm d,all,,,,,,uz ! 在所有节点施加 uz 约束 dl,3,,ux ! 在线 3 上施加 ux 约束 d,14,,-,,,,uy ! 在节点 14 上施加 uy 约束 nlgeom,on pred,on time, artots,1 nsubst,120,,,1 outres,all,-10 solve fini /post1 set,last /dscale,1,1 pldisp,2 plnsol,nl,psv,0,1 plnsol,s,eqv,o,1 plnsol,epto,eqv,0,1 fini /post26 rforce,2,14,f,force add,2,2,,,n_force,,,-1,1,1 plvar,2 fini 实例分析: 1. 本例的特点在于约束的施加;对上面一条线进行耦合后,又对节点 14 施加了 uy 约束, 等效于给上面一条线施加了 uy 约束; 由于摩擦的缘故, 又对上面一条线施加了 ux 约束; 并且对面上所有节点施加了 uz 约束;其实等于把上面一条线施加了 uy、 ux、 uz 约束; 其它点施加了 uz 约束;并对左线和底线施加了对称约束; 2. 本例为何没有施加力???????