| 查看: 1069 | 回复: 0 | |||
[求助]
关于钢筋混凝土梁粘结滑移的计算，请大牛帮我看一段命令流并指出问题和解决方法。
|
|
finish /clear /prep7 et,1,solid65 keyopt,1,7,1 mp,ex,1,28500 mp,prxy,1,0.2 fck=30 ftk=3 tb,concr,1 tbdata,,0.5,0.95,ftk,-1 tb,miso,1,,11 tbpt,,0.0002,fck*0.19 tbpt,,0.0004,fck*0.36 tbpt,,0.0006,fck*0.51 tbpt,,0.0008,fck*0.64 tbpt,,0.001,fck*0.75 tbpt,,0.0012,fck*0.84 tbpt,,0.0014,fck*0.91 tbpt,,0.0016,fck*0.96 tbpt,,0.0018,fck*0.99 tbpt,,0.002,fck tbpt,,0.0033,fck et,2,link8 mp,ex,2,2e5 mp,prxy,2,0.3 tb,biso,2 tbdata,,350,0 mp,ex,3,2e5 mp,prxy,3,0.25 tb,biso,3 tbdata,,200,0 et,3,combin39 keyopt,3,3,3 et,4,solid45 mp,ex,4,2e6 mp,prxy,4,0.3 pi=acos(-1) r,1 r,2,0.25*pi*14*14 r,3,0.25*pi*8*8 r,4,0.25*pi*6.5*6.5 r,5,0.25*pi*6.5*6.5/2 r,6,0,0,0.5E-5,4497.60,1.0E-5,7126.36 rmore,1.5E-5,8567.28,2.0E-5,9324.77,2.5E-5,9726.64 rmore,3.0E-5,9924.14,3.5E-5,9891.92,4.0E-5,9428.07 rmore,4.5E-5,8154.07,5.0E-5,5514.84 r,7 blc4,,,82.5,415,2075 /view,1,1,1,1 /replot wpoffs,,,2075 *do,i,1,12,1 wpoffs,,,-170 vsbw,all *enddo wpcsys,-1 wpoffs,,25 wprota,,90 vsbw,all wpoffs,,,-365 vsbw,all wpcsys,-1 wpoffs,25 wprota,,,90 vsbw,all wpcsys,-1 wpoffs,,,35 blc4,,,82.5,-25,170 wpcsys,-1 /replot vatt,1,1,1 lsel,s,loc,x,0 lsel,r,loc,y,0 lesize,all,34 lsel,all lsel,s,loc,z,0 lsle,r,loc,x,0 lesize,all,25 lsel,all vsel,s,loc,y,0,415 mshkey,1 vmesh,all allsel,all vatt,4,7,4 lsel,s,loc,x,0 lsel,r,loc,y,-25,0 lsel,r,loc,z,35 lesize,all,25 lsel,all vsel,s,loc,y,-25,0 mshkey,1 vmesh,all nummrg,all lsel,s,tan1,z lsel,r,loc,x,25,82.5 lsel,r,loc,y,25,390 lsel,u,loc,x,82.5 lsel,u,loc,z,0 lsel,u,loc,z,125 lsel,u,loc,z,1425 lsel,u,loc,z,1525 lsel,u,loc,z,2075 latt,3,4,2 lesize,all,25 type,2 real,4 mat,3 lmesh,all lsel,all lsel,s,loc,z,2075 lsel,r,loc,x,25,82.5 lsel,r,loc,y,25,390 lsel,u,loc,x,82.5 latt,3,5,2 lesize,all,25 type,2 real,5 mat,3 lmesh,all lsel,all lsel,s,loc,x,25 lsel,r,loc,y,390 lsel,r,loc,z,35,2075 latt,3,3,2 lesize,all,25 type,2 real,3 mat,3 lmesh,all lsel,all esel,s,type,,2 /eshape,1 eplot allsel,all eplot lsel,none k,10000,25,25,35 k,10001,25,25,2075 l,10000,10001 lesize,all,34 latt,2,2,2 lmesh,all cpintf,ux !创建节点的耦合自由度UX *get,cpmax,cp,,max !获取藕合组总数 type,3 real,6 *do,i,1,cpmax *get,n1,cp,i,term,1,node !获取第i组的第一个节点号 *get,n2,cp,i,term,2,node !获取第i组的第二个节点号 e,n1,n2 *enddo cpintf,uy asel,s,loc,y,-25 asel,r,loc,z,35,205 da,all,uy allsel,all asel,s,loc,x,82.5 da,all,symm asel,s,loc,z,2075 da,all,symm allsel,all *SET,p0,60e3 *SET,q0,p0/82.5/170 asel,s,loc,z,1395,1565 asel,r,loc,y,415 sfa,all,1,pres,q0 allsel,all /solu antype,0 outres,all,all autots,on neqit,60 nsubst,800,,500 cnvtol,u,,0.05 cnvtol,f,,0.05 solve |
回复此楼» 猜你喜欢
收到国自然专家邀请后几年才会有本子送过来评
已经有4人回复
-
考博
已经有5人回复
-
26年申博自荐-计算机视觉
已经有4人回复
-
药化及相关博士的申请
已经有3人回复
-
一篇MDPI论文改变了学习工作和生活
已经有4人回复
-
一个化合物的合成路线：CAS:367929-02-0 名称：8β-乙烯基雌二醇
已经有4人回复
-
中国地质大学（北京）博士招生补录，数理学院材料科学与工程专业和材料与化工专业
已经有3人回复