ANSYS(APDL)拱坝有限元计算

  • x6_365323
    了解作者
  • 10MB
    文件大小
  • zip
    文件格式
  • 0
    收藏次数
  • VIP专享
    资源类型
  • 0
    下载次数
  • 2022-06-14 07:28
    上传日期
源于某拱坝结构安全评价项目,计算程序考虑重力、水压力、泥沙压力、温度荷载等荷载进行线弹性有限元计算。 文件包含拱坝模型(采用ANSYS12.1建模,高于此版本的应当可以打开)、计算命令流和温度组件创建的命令流。 对于想要进行其他相似工程计算的需求,只需建立相应工程模型、创建计算命令流中相应的组件、修改材料、荷载参数即可应用。 拱坝温度组件创建命令流主要针对依据《混凝土拱坝设计规范》或《砌石坝设计规范》计算并施加拱坝温度场的模仿真。
拱坝应力计算.zip
  • 拱坝某工况计算命令流.txt
    3.3KB
  • model.db
    68.7MB
  • 拱坝温度节点组件创建.txt
    594B
内容介绍
/PREP7 ! 单位系:m-Pa-N-Kg *del,all LSCLEAR,ALL !!!!赋予材料属性 !坝体材料赋予 MP,DENS,1,2400 MP,PRXY,1,0.167 MP,EX,1,2E10 MP,ALPX,1,6e-6 !热膨胀系数 MP,REFT,1,0 !单元生成的初始温度 CMSEL,S,dame ALLSEL,BELOW,ELEM MPCHG,1,ALL !地基材料赋予 MP,DENS,2,2660 MP,PRXY,2,0.26 MP,EX,2,2.2E10 CMSEL,S,baseup ALLSEL,BELOW,ELEM MPCHG,2,ALL !地基材料赋予 MP,DENS,3,2680 MP,PRXY,3,0.23 MP,EX,3,3.2E10 CMSEL,S,basedown ALLSEL,BELOW,ELEM MPCHG,3,ALL !!!!定义参数 *AFUN,DEG Z_UP=44 !!!!上游水位 Z_DOWN=0 !!!!下游水位 Z_DAMBOTT=0 !!!!坝底高程 Z_SAND=15 !!!!泥沙高程 K_Z1=0.25 !!!!扬压力系数 L_K=2.8 !!!!防渗帷幕距上游坝面距离 D_T=9.86 !!!!坝底长度 csys,0 dsys,0 ALLSEL,ALL !!!泥沙压力 ALLSEL,ALL /SOLU SFCUM,PRES,ADD CMSEL,S,UPFACE NSLA,S,1 NSEL,R,LOC,Z,0,Z_SAND SFGRAD,PRES,0,Z,Z_SAND,-9000*TAN(45-12/2)*TAN(45-12/2) SF,ALL,PRESS,0 !!!上游水压力 ALLSEL,ALL /SOLU SFCUM,PRES,ADD CMSEL,S,UPFACE NSLA,S,1 NSEL,R,LOC,Z,0,Z_UP SFGRAD,PRES,0,Z,Z_UP,-9800 SF,ALL,PRESS,0 !!!下游水压力 ALLSEL,ALL /SOLU SFCUM,PRES,ADD CMSEL,S,DOWNFACE NSLA,S,1 NSEL,R,LOC,Z,0,Z_DOWN SFGRAD,PRES,0,Z,Z_DOWN,-9800 SF,ALL,PRESS,0 !!!!!!!!!!!!!!!!!!!坝底扬压力!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ALLSEL,ALL /SOLU ! 以节点集中力的形式施加扬压力 P1=(Z_UP-Z_DAMBOTT)*9800 P2=(Z_DOWN-Z_DAMBOTT)*9800 cmsel,s,node1 nsel,r,loc,z,-0.01,0.01 f,all,fz,2.89*P1+0.5*P2 cmsel,s,node2 nsel,r,loc,z,-0.01,0.01 f,all,fz,1.959375*P1+0.5*P2 cmsel,s,node3 nsel,r,loc,z,-0.01,0.01 f,all,fz,0.77*P1+0.5*P2 cmsel,s,node4 nsel,r,loc,z,-0.01,0.01 f,all,fz,0.66171875*P1+0.5*P2 cmsel,s,node5 nsel,r,loc,z,-0.01,0.01 f,all,fz,0.556875*P1+0.5*P2 cmsel,s,node6 nsel,r,loc,z,-0.01,0.01 f,all,fz,0.45546875*P1+0.5*P2 cmsel,s,node7 nsel,r,loc,z,-0.01,0.01 f,all,fz,0.3575*P1+0.5*P2 cmsel,s,node8 nsel,r,loc,z,-0.01,0.01 f,all,fz,0.26296875*P1+0.5*P2 cmsel,s,node9 nsel,r,loc,z,-0.01,0.01 f,all,fz,0.171875*P1+0.5*P2 cmsel,s,node10 nsel,r,loc,z,-0.01,0.01 f,all,fz,0.08421875*P1+0.5*P2 cmsel,s,node11 nsel,r,loc,z,-0.01,0.01 f,all,fz,0*P1+0.5*P2 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!温度荷载 /PREP7 *DIM,TEMPUP,TABLE,8 *DIM,TEMPDOWN,TABLE,8 ! 根据《混凝土拱坝设计规范》或《砌石坝设计规范》中的热传导理论计算各拱圈的截面平均温度和线性温差 TEMPUP(1)=-9.27,-4.75,-0.65,1.07,2.14,4.73,5.02,4.40 TEMPUP(1,0)=0,9,16,23,30,37,44,50 TEMPDOWN(1)=-9.27,-8.24,-4.63,-3.32,-2.55,-0.17,-0.00,3.42 TEMPDOWN(1,0)=0,9,16,23,30,37,44,50 ! 在建模时根据拱坝厚度方向划分份数进行设置,本模型中厚度方向有10层单元,11层节点 ! 自上游侧向下游侧依次定义每层节点组件为node1至node11 /SOLU *DO,IT,1,11 CMSEL,S,NODE%IT% *GET,NCOUNT_DAM,NODE,,COUNT *GET,NMIN_DAM,NODE,,NUM,MIN TUNIF,0, TREF,0, NTT=NMIN_DAM KIT=(IT-1)/10 *DO,II,1,NCOUNT_DAM Z_NTT=NZ(NTT) T_UP=TEMPUP(Z_NTT) T_DOWN=TEMPDOWN(Z_NTT) TTT=T_UP+KIT*(T_DOWN-T_UP) BF,NTT,TEMP,TTT *IF,II,LT,NCOUNT_DAM,THEN NTT=NDNEXT(NTT) *ENDIF *ENDDO *ENDDO !!!施加约束 ALLSEL,ALL /SOLU CMSEL,S,XBJ NSLA,S,1 D,ALL,UX CMSEL,S,YBJ NSLA,S,1 D,ALL,UY CMSEL,S,ZBJ NSLA,S,1 D,ALL,UZ !!!!施加重力 ALLSEL,ALL ACEL,0,0,9.8, ALLSEL,ALL /SOLU ALLSEL,ALL SOLVE
评论
    相关推荐
    • 建筑设计规范
      公路桥涵地基与基础设计规范,建筑设计规范
    • 程序设计规范
      人们看到最好的作家有时并不理会修辞学的规则。还好,当他们这样做虽然付 出了违反常规的代价,读者还经常能从句子中发现某些具有补偿性的价值。除非作 者自己也明确其做法的意思,否则最好还是按规矩做。
    • Protel设计规范
      Protel电路设计中用到的详细的PCB设计规范
    • WEB设计规范
      WEB设计规范,介绍了常用的CSS编写格式,包括命名和语法等
    • 饮食建筑设计规范
      这是一份饮食建筑设计规范,拥有着正确的理念指导与专业知识,希望饮食建筑设计规范定不会让你失望!PS:...该文档为饮食建筑设计规范,是一份很不错的参考资料,具有较高参考价值,感兴趣的可以下载看看
    • .NET设计规范
      .NET设计规范 pdf格式 非常全面的书籍
    • 电气设计规范汇总
      本汇编搜集了综合类规范、供配电设计规范、电力系统装置设计规范、照明设计规范、消防报警系统设计规范、监控、电视、通讯系统设 介绍了关于电气设计规范汇总的详细说明,提供电气规范的技术资料的下载。
    • 蚂蚁设计规范
      阿里蚂蚁进入UI设计规范,包括设计、模板、组件等文档说明及开发示例。
    • 制冷设计规范
      一个工程往往需要多种技术、多种方案、多种途径来实施,而你缺少的或许就是制冷设计规范,欢迎大家下载制...该文档为制冷设计规范,是一份很不错的参考资料,具有较高参考价值,感兴趣的可以下载看看
    • 软件设计规范
      软件设计规范 ,很不错哦