声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1042|回复: 1

[结构分析] 连续钢构桥三维仿真分析【转】

[复制链接]
发表于 2011-3-11 15:28 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x


  1. /filname,rigid bridge,1
  2. keyw,pr_struc,1
  3. /prep7
  4. !定义单元类型
  5. et,1,shell63
  6. et,2,link8
  7. !定义实常数
  8. r,1,0.25            !顶层与底层
  9. r,2,0.6             !腹板
  10. r,3,1               !v形支撑的厚度
  11. r,4,0.02,-0.005
  12. !定义材料属性
  13. mp,ex,1,3.25e10   !混凝土
  14. mp,prxy,1,0.2
  15. mp,dens,1,2700
  16. mp,ex,2,207e9     !钢筋
  17. mp,prxy,2,0.3
  18. mp,dens,2,7800


  19. !建模
  20. /view,1,1,1,1    !以正等侧方式观看
  21. k,1              !建立主桥边界面上的关键点
  22. k,2,4
  23. k,3,10
  24. k,4,16
  25. k,5,20
  26. k,6,24
  27. k,7,30
  28. k,8,36
  29. k,9,40
  30. k,10,4,-1.8
  31. k,11,10,-1.8
  32. k,12,16,-1.8
  33. k,13,24,-1.8
  34. k,14,30,-1.8
  35. k,15,36,-1.8
  36. kgen,2,1,15,1,,,-16      !建立梁高为1.8m处的关键点
  37. kgen,2,1,15,1,,,-85
  38. kgen,2,1,15,1,,,-154
  39. kgen,2,1,15,1,,,-170
  40. k,101,,,-36              !建立梁高为3m处的关键点
  41. k,102,4,,-36
  42. k,103,10,,-36
  43. k,104,16,,-36
  44. k,105,20,,-36
  45. k,106,24,,-36
  46. k,107,30,,-36
  47. k,108,36,,-36
  48. k,109,40,,-36
  49. kgen,2,102,104,1,,-3,,8
  50. kgen,2,106,108,1,,-3,,7
  51. kgen,2,101,115,1,,,-12,15
  52. kgen,2,116,130,1,,,-12,15
  53. kgen,2,131,145,1,,,-50,15
  54. kgen,3,146,160,1,,,-12,15
  55. !建立箱形梁的顶层并划分网格
  56. *do,i,1,8,1
  57. a,i,i+15,i+16,i+1
  58. *enddo
  59. *do,i,16,23,1
  60. a,i,i+85,i+86,i+1
  61. *enddo
  62. *do,i,101,108,1
  63. a,i,i+15,i+16,i+1
  64. *enddo
  65. *do,i,116,123,1
  66. a,i,i+15,i+16,i+1
  67. *enddo
  68. *do,i,31,38,1
  69. a,i,i+100,i+101,i+1
  70. *enddo
  71. *do,i,31,38,1
  72. a,i,i+115,i+116,i+1
  73. *enddo
  74. *do,i,146,153,1
  75. a,i,i+15,i+16,i+1
  76. *enddo
  77. *do,i,161,168,1
  78. a,i,i+15,i+16,i+1
  79. *enddo
  80. *do,i,46,53,1
  81. a,i,i+130,i+131,i+1
  82. *enddo
  83. *do,i,46,53,1
  84. a,i,i+15,i+16,i+1
  85. *enddo
  86. lesize,all,4            !设置单元长度为4
  87. aatt,1,1,1
  88. amesh,all

  89. !建立箱形梁的底层并划分网格
  90. asel,u,,,all
  91. kplot
  92. *do,i,10,11,1
  93. a,i,i+15,i+16,i+1
  94. *enddo
  95. *do,i,13,14,1
  96. a,i,i+15,i+16,i+1
  97. *enddo
  98. *do,i,25,26,1
  99. a,i,i+85,i+86,i+1
  100. *enddo
  101. *do,i,28,29,1
  102. a,i,i+85,i+86,i+1
  103. *enddo
  104. *do,i,110,111,1
  105. a,i,i+15,i+16,i+1
  106. *enddo
  107. *do,i,113,114,1
  108. a,i,i+15,i+16,i+1
  109. *enddo
  110. *do,i,125,126,1
  111. a,i,i+15,i+16,i+1
  112. *enddo
  113. *do,i,128,129,1
  114. a,i,i+15,i+16,i+1
  115. *enddo
  116. *do,i,40,41,1
  117. a,i,i+100,i+101,i+1
  118. *enddo
  119. *do,i,43,44,1
  120. a,i,i+100,i+101,i+1
  121. *enddo
  122. *do,i,40,41,1
  123. a,i,i+115,i+116,i+1
  124. *enddo
  125. *do,i,43,44,1
  126. a,i,i+115,i+116,i+1
  127. *enddo
  128. *do,i,155,156,1
  129. a,i,i+15,i+16,i+1
  130. *enddo
  131. *do,i,158,159,1
  132. a,i,i+15,i+16,i+1
  133. *enddo
  134. *do,i,170,171,1
  135. a,i,i+15,i+16,i+1
  136. *enddo
  137. *do,i,173,174,1
  138. a,i,i+15,i+16,i+1
  139. *enddo
  140. *do,i,55,56,1
  141. a,i,i+130,i+131,i+1
  142. *enddo
  143. *do,i,58,59,1
  144. a,i,i+130,i+131,i+1
  145. *enddo
  146. *do,i,55,56,1
  147. a,i,i+15,i+16,i+1
  148. *enddo
  149. *do,i,58,59,1
  150. a,i,i+15,i+16,i+1
  151. *enddo
  152. lesize,all,4
  153. aatt,1,1,1
  154. amesh,all
  155. !建立腹板并划分网格
  156. asel,u,,,all
  157. *do,i,2,4,1
  158. a,i,i+8,i+23,i+15
  159. *enddo

  160. *do,i,6,8,1
  161. a,i,i+7,i+22,i+15
  162. *enddo
  163. *do,i,17,19,1
  164. a,i,i+8,i+93,i+85
  165. *enddo
  166. *do,i,21,23,1
  167. a,i,i+7,i+92,i+85
  168. *enddo
  169. *do,i,102,104,1
  170. a,i,i+8,i+23,i+15
  171. *enddo
  172. *do,i,106,108,1
  173. a,i,i+7,i+22,i+15
  174. *enddo
  175. *do,i,117,119,1
  176. a,i,i+8,i+23,i+15
  177. *enddo
  178. *do,i,121,123,1
  179. a,i,i+7,i+22,i+15
  180. *enddo
  181. *do,i,32,34,1
  182. a,i,i+8,i+108,i+100
  183. *enddo
  184. *do,i,36,38,1
  185. a,i,i+7,i+107,i+100
  186. *enddo
  187. *do,i,32,34,1
  188. a,i,i+8,i+123,i+115
  189. *enddo
  190. *do,i,36,38,1
  191. a,i,i+7,i+122,i+115
  192. *enddo
  193. *do,i,147,149,1
  194. a,i,i+8,i+23,i+15
  195. *enddo
  196. *do,i,151,153,1
  197. a,i,i+7,i+22,i+15
  198. *enddo
  199. *do,i,162,164,1
  200. a,i,i+8,i+23,i+15
  201. *enddo
  202. *do,i,166,168,1
  203. a,i,i+7,i+22,i+15
  204. *enddo
  205. *do,i,47,49,1
  206. a,i,i+8,i+138,i+130
  207. *enddo
  208. *do,i,51,53,1
  209. a,i,i+7,i+137,i+130
  210. *enddo
  211. *do,i,47,49,1
  212. a,i,i+8,i+23,i+15
  213. *enddo
  214. *do,i,51,53,1
  215. a,i,i+7,i+22,i+15
  216. *enddo
  217. lsel,s,loc,y,-0.9
  218. lesize,all,,,1
  219. lsel,s,loc,y,-1.5
  220. lesize,all,,,2
  221. esize,all,4
  222. aatt,1,2,1
  223. amesh,all
  224. !预应力钢筋布置及网格划分
  225. lsel,s,loc,x,3.9,4.1
  226. lsel,a,loc,x,9,11
  227. lsel,a,loc,x,15,17
  228. lsel,a,loc,x,23,25
  229. lsel,a,loc,x,29,31
  230. lsel,a,loc,x,35,37
  231. lsel,u,loc,y,-1.7,-0.1
  232. lesize,all,4             !单元长度为4
  233. latt,2,4,2               !单元为2,实常数为4,材料属性为2
  234. lmesh,all
  235. !建立v形支撑模型并划分网格
  236. asel,u,loc,y,-3.1,0.1
  237. k,1001,4,-15,-48
  238. k,1002,16,-15,-48
  239. k,1003,24,-15,-48
  240. k,1004,36,-15,-48
  241. k,2001,4,-15,-122
  242. k,2002,16,-15,-122
  243. k,2003,24,-15,-122
  244. k,2004,36,-15,-122
  245. a,110,112,1002,1001
  246. a,112,113,1003,1002
  247. a,113,115,1004,1003
  248. a,140,142,1002,1001
  249. a,142,143,1003,1002
  250. a,143,145,1004,1003
  251. a,155,157,2002,2001
  252. a,157,158,2003,2002
  253. a,158,160,2004,2003
  254. a,185,187,2002,2001
  255. a,187,188,2003,2002
  256. a,188,190,2004,2003
  257. lesize,all,4
  258. aatt,1,3,1
  259. amesh,all
  260. nummrg,all
  261. numcmp,all
  262. allsel
  263. !加载及求解
  264. !施加位移约束
  265. nsel,s,loc,z,-0.1,0.1
  266. nsel,a,loc,z,-171,-169
  267. nsel,r,loc,y,-1.9,-1.7
  268. d,all,uy
  269. allsel
  270. nsel,s,loc,y,-16,-14
  271. d,all,all
  272. allsel
  273. !预应力静力求解
  274. /solu
  275. acel,,9.8
  276. pstres,on
  277. allsel
  278. solve
  279. finish
  280. !预应力模态求解
  281. /solu
  282. antype,2
  283. upcoord,1,on
  284. pstres,on
  285. modopt,subsp,10
  286. mxpand,10,,,1
  287. allsel
  288. solve
  289. finish
复制代码
回复
分享到:

使用道具 举报

发表于 2011-4-13 12:08 | 显示全部楼层
很给力  真的
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-9-22 06:50 , Processed in 0.052154 second(s), 17 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表