文档详情

ANSYS循环搜索命令流.pdf

发布:2022-06-20约1.09万字共18页下载文档
文本预览下载声明
cm,nn,node !将钢筋节点编组 nsel,s,,,nn !选择钢筋节点 *get,nd,node,0,num,min !得到最小的节点编号 *get,nnod1,node,0,count !取出钢筋节点总数 *dim,nodes1,,nnod1 !定义钢筋节点编号数组,节点坐标数组 *dim,minnode1,,nnod1 *dim,aa1,array,nnod1 *dim,bb1,array,nnod1 *dim,cc1,array,nnod1 *do,i,1,nnod1,1 !数组赋值 nodes1(i)=nd aa1(i)=nx(nd) bb1(i)=ny(nd) cc1(i)=nz(nd) nd=ndnext(nd) *enddo nsel,inve !选择钢筋附近的节点(去除钢筋节点),找到钢筋的最近节点 *do,i,1,nnod1 minnode1(i)=node(aa1(i),bb1(i),cc1(i)) *enddo a sel,a !进行耦合 *do,i,1,nnod1,1 cp,i,uz,nodes1(i),minnode1(i) cp,10000+i,ux,nodes1(i),minnode1(i) cp,20000+i,uy,nodes1(i),minnode1(i) *enddo beyondboy 你好,我试着嵌套了几次,都不成功,下面是我的一个拱桥的命令流,期待帮 我看看,我的墩和腹拱之间的耦合就出现一个节点在两个组里面,期望高手改改我的命令流! fini /cle /prep7 /title,极限承载力分析 *dim,xlx,,36 xlx(1)=74.25,72.43,70.61,68.79,66.97,65.15,62.905,60.66,58.415,56.17 xlx(11)=53.925,51.71,49.495,47.28,45.065,42.85,40.665,38.48,36.295,34.11 xlx(21)=31.925,29.77,27.615,25.46,23.305,21.15,19.025,16.9,14.775,12.65 xlx(31)=10.525,8.42,6.315,4.21,2.105,0 *do,i,1,36,1 angle=atan(0.5115*sinh(1.475*xlx(i)/74.25)) h=((2.5**3)/((1-(1-0.5225)*xlx(i)/74.25)*cos(angle)))**(1/3) z1=-xlx(i)-(h/2)*sin(angle) y1=-(32.474/1.30)*(cosh(1.475*(-xlx(i))/74.25)-1)+(h/2)*cos(angle) z2=-xlx(i)+(h/2)*sin(angle) y2=-(32.474/1.30)*(cosh(1.475*(-xlx(i))/74.25)-1)-(h/2)*cos(angle) k,i,0,y1,z1 k,36+i,0,y2,z2 *enddo *do,i,1,31,5 a,i,i+1,i+2,i+3,i+4,i+5,i+41,i+40,i+39,i+38,i+37,i+36 *enddo arsym,z,1,7,1,100,0,0 a se nummrg,a k,1001,0,0,100 k,1002,23.9,0,100 l,1001,1002 vdrag,1,2,3,4,5,6,151 vdrag,8,9,10,11,12,13,151 vdrag,7,14,,,,,151 ldel,151,,,1 a se nummrg,a /view,1,-1,1,-1 a se vplo !腹拱墩 *dim,zgd,,7 zgd(1)=65.154,53.929,42.854,31.929,21.154,10.529,0 *dim,kd,,7 kd(1)=1.9,1.75,1.6,1.45,1.3,1.15,1 *do,i,1,7,1 z=-zgd(i) k,2000+i,0.1,2.25,z-kd(i)/2 k,2010+i,0.1,2.25,z+kd(i)/2 k,2020+i,23.9,2.25,z-kd(i)/2 k,2030+i,23.9,2.25
显示全部
相似文档