簡支梁+連續(xù)梁建模+預(yù)應(yīng)力鋼筋分析實(shí)例-APDL

1、簡支梁實(shí)體與預(yù)應(yīng)力鋼筋分析實(shí)例 /COM, Structural /PREP7 egjx=2e5 !Ey agjx=140 !單根鋼絞線面積 ehnt=4e4 !Eh xzxs=1.0e-5 !線脹系數(shù) yjl=200000 !定義預(yù)加力 et,1,link8 !定義link8單元 et,2,solid95 !定義solid95單元 r,1,agjx !定義link8單元的面積 r,2 !定義第2種實(shí)常數(shù) mp,ex,1,egjx !定義link8單元的彈性模量 mp,prxy,1,0.3 !定義link8單元的泊松系數(shù) mp,alpx,1,1.0e-5 !定義線膨脹系數(shù) mp,ex,2,eh

2、nt !定義solid95單元的彈性模量 mp,prxy,2,0.3 !定義solid95單元的泊松系數(shù) blc4, , ,100,200,3000 !定義梁體 /view,1,1,1,1 !定義ISO查看 /ang,1 vplot !繪制梁體 kwpave,6 !工作平面移動到關(guān)鍵點(diǎn)6 wpoff,-30 !工作平面移動-30mm(X) wprot,0,0,90 !工作平面旋轉(zhuǎn) vsbw,1 !分割梁體 wpoff,0,0,-40 !工作平面移動-40mm(Z) vsbw,2 !分割梁體 wpoff,0,40 !工作平面移動40mm(Y) wprot,0,90 !工作平面旋轉(zhuǎn) vsbw,al

3、l !分割梁體 wpstyl !關(guān)閉工作平面顯示 nummrg,all,low !整理 numcmp,all !壓縮編號 esize,30 !定義網(wǎng)分時邊長控制 lsel,s,28,38,10 !定義line28和38為新的選擇集 latt,1,1,1 !定義選擇集的屬性 lmesh,all !對線劃分單元 allsel,all !新的選擇集為所有的實(shí)體 gplot !繪制所有的實(shí)體 vsel,s,all !定義所有體為選擇集 vatt,2,2,2 !定義選擇集的屬性 mshape,0,3d !將體劃分單元的形狀定位HEX mshkey,1 !采用MAPPED劃分器 vmesh,all !對體

4、進(jìn)行劃分單元 finish /solu dl,3,all !對線line7施加約束(UX,UY,UZ) dl,16,all !對線line31施加約束(UX,UY,UZ) dl,23,all !對線line23施加約束(UX,UY,UZ) dl,2,uy !對線line4施加約束(UY) dl,15,uy !對線line30施加約束(UY) dl,22,uy !對線line23施加約束(UY) dk,2,ux,uy !對關(guān)鍵點(diǎn)2約束(UX,UY) bfl,28,temp,-yjl/(xzxs*egjx*agjx) !對鋼絞線施加溫度 bfl,38,temp,-yjl/(xzxs*egjx*ag

5、jx) !對鋼絞線施加溫度 solve !求解 finish /post1 plnsol,s,z,0,1 !繪制Z方向的應(yīng)力 etable,sigi,ls,1 !定義鋼筋單元數(shù)據(jù)表 plls,sigi,sigi,1 !繪制上述應(yīng)力 !finish !/exit,nosav 模擬預(yù)應(yīng)力損失的兩種方法方法1：通過體分割的辦法建立預(yù)應(yīng)力鋼束，然后通過定義降溫荷載來模擬預(yù)應(yīng)力效應(yīng)。這種方法在張立明編的ALGOR、ANSYS在橋梁工程中的應(yīng)用方法與實(shí)例中有一個算例。命令流如下：/prep7  /title,the analysis of the solid beam and pres

6、tressed tendon/DIST,1,1.08222638492,1/REP,FAST   *SET,egjx,2e11  !定義彈性模量*SET,agjx,60e-4 !*SET,ehnt,3.5e10*SET,xzxs,1.2e-5*SET,yjl,200000et,1,link8  !定義預(yù)應(yīng)力鋼筋單元類型為Link8單元et,2,solid95 !r,1,agjx !定義實(shí)常數(shù)r,2mp,ex,1,egjxmp,prxy,1,0.3   mp,dens,1,7800 &#

7、160;mp,dens,2,2500  mp,alpx,1,xzxs  mp,ex,2,ehntmp,prxy,2,0.3   blc4,1,2,30   /VIEW,1,1,1,1   /ANG,1  /AUTO,1/REP,FAST   klist,all   kwpave,6wpoff,-0.3  wprot,0,0,90vsbw,1  wp

8、off,0,0,-0.4  vsbw,2  wpoff,0,0.4wprot,0,90  vsbw,allwpstyl  nummrg,all,low   numcmp,all  esize,0.3   klist,all   llist,all   lsel,s,28,38,10   latt,1,1,1  lmesh,all

9、   allsel,all  gplot   vsel,s,allvatt,2,2,2  mshape,0,3dmshkey,1vmesh,all   finish  /solu   dl,3,all   dl,16,all  dl,23,all  dl,2,uydl,15,uy   dl,22,uy 

10、60; /AUTO,1/REP,FAST   bfl,28,temp,-yjl/(xzxs*egjx*agjx)   bfl,38,temp,-yjl/(xzxs*egjx*agjx)   allsel  acel,9.8   solve   finish  /post1  pldisp  plnsol,s,1方法二：體線獨(dú)立耦合法建立預(yù)應(yīng)力鋼束命令流如下，

11、并附有命令說明：/prep7  *SET,eg,2e5    !鋼束彈模*SET,ag,140    !鋼束面積*SET,eh,4e4    !混凝土的彈模*SET,r0,9345   !曲線鋼束的半徑   *SET,yyl,200000  !鋼束的預(yù)應(yīng)力大小et,1,link8       !定于預(yù)應(yīng)力鋼束

12、單元類型為link8et,2,solid95     !定義混凝土單元類型為solid95r,1,ag,yyl/eg/ag*1.036258     !定義單元實(shí)常數(shù)，對于link8單元為鋼束面積、以及鋼束的初始應(yīng)變（除模擬預(yù)應(yīng)力張拉還會用于應(yīng)力剛度矩陣的計算）   r,2              !solid95的單元實(shí)常數(shù)

13、僅為x軸的調(diào)整，并且該實(shí)常數(shù)僅僅在單元坐標(biāo)系統(tǒng)選擇為1的時候填寫。一般不填。mp,ex,1,eg       !預(yù)應(yīng)力鋼束單元性質(zhì)，包括之前定義的彈模，泊松比mp,prxy,1,0.3   mp,ex,2,eh       !混凝土單元性質(zhì)，包括彈模、泊松比  mp,prxy,2,0.2   blc4,100,200,3000   !定義長方體的長

14、寬高（混凝土塊體）/view,1,1,1,1         !調(diào)整觀察的角度   /ang,1  vplot                 !顯示選擇的體  ksel,all       

15、0;      !選擇所有的關(guān)鍵點(diǎn)klist*get,kp0,kp,0,num,max !將最大的kp編號存于kp0中，因?yàn)槭孪炔恢雷畲蟮年P(guān)鍵點(diǎn)號是多少，所以先要存在kp0中  lsel,none             !不選擇所有的線llist   k,kp0+1,50,160      &#

16、160; !定義關(guān)鍵點(diǎn)，kp0是已有的最大關(guān)鍵點(diǎn)編號。k,kp0+2,50,160,3000k,kp0+3,50,800,1500larc,kp0+1,kp0+2,kp0+3,r0      !將定義的以上三點(diǎn)連成一條圓弧，半徑為r0。kp0+3用于定義圓弧所在面及曲線邊中點(diǎn)  kdele,kp0+3                 &#

17、160;  !刪除kp0+3這個關(guān)鍵點(diǎn)klistllist*get,line1,line,0,num,min      !將最小的線編號存于line1中，因?yàn)閘ine1是最先定義的預(yù)應(yīng)力鋼束  lsel,s,loc,z,0                 !選擇z、y坐標(biāo)均為0的線，用于施加約束（該線為右側(cè)截面的梁底線）lsel

18、,r,loc,y,0  dl,all,uy                     !對線施加y方向的約束  lsel,s,loc,z,3000              !選擇左側(cè)截面梁底線（即z=3000，

19、而y=0的線）   lsel,r,loc,y,0  dl,all,all                    !對選擇的線施加約束（UX、UY、UZ）allsel,all               

20、;      !選擇所有對象  lsel,s,line1                 !選擇線，最小值line1  latt,1,1,1                

21、;     !將單元性質(zhì)與選擇的、尚未網(wǎng)格化的線聯(lián)系起來  lesize,all,50                !線單元劃分的數(shù)目lmesh,all                  

22、    !對line1進(jìn)行分網(wǎng)   vsel,all                       !選擇所有的體vlistvatt,2,2,2             &

23、#160;       !給體賦予相應(yīng)的屬性(混凝土)  lsel,s,loc,z,0                 !選擇z=0，而y坐標(biāo)從10到140范圍內(nèi)的所有的線  lsel,r,loc,y,10,140lesize,all,8       

24、;          !分網(wǎng)數(shù)目8  lsel,s,loc,z,0                 !再次選擇z=0，而不選y坐標(biāo)從10到140范圍內(nèi)的所有線  lsel,u,loc,y,10,140lesize,all,4     

25、60;           !分網(wǎng)數(shù)目為4  lsel,s,loc,y,0                 !選擇x=0、y=0坐標(biāo)處的線（僅有一根線被選中）注意這根線是一根分網(wǎng)的掃掠線。lsel,r,loc,x,0  lesize,all,50   

26、;             !分網(wǎng)數(shù)目為50vsweep,all                     !通過掃掠網(wǎng)格的方法來用單元填充體          

27、             allsel,all                     !選擇所有的對象  lsel,s,line1         

28、        !選擇line1最小值（預(yù)應(yīng)力鋼絞線）  nsll,s,1                       !選擇與所選擇的線對應(yīng)的所有的節(jié)點(diǎn)，即鋼絞線上面的節(jié)點(diǎn)，因?yàn)榫W(wǎng)格數(shù)為50，所以節(jié)點(diǎn)總數(shù)為51cm,cmljnod,node  &#

29、160;             !將鋼絞線節(jié)點(diǎn)編組，其組名為cmljnod*get,max1,node,0,count         !選擇鋼絞線中的節(jié)點(diǎn)單元數(shù)目，將其賦給變量max1，此變量可以作為*do循環(huán)的上界來確定循環(huán)的次數(shù)  *dim,ojd,max1        

30、;         !定義數(shù)組序列。數(shù)組名為ojd，max1為行的范圍  *dim,jd,max1                  !定義數(shù)組序列。數(shù)組名為jd，max1為行的范圍   *get,nod1,node,0,num,min   

31、0;   !選擇集中最小的節(jié)點(diǎn)號，賦給變量nod1，作為*do循環(huán)的上界*SET,ojd(1),nod1               !將nod1的值賦給ojd(1)*do,i,2,max1                   !

32、do循環(huán)，從2到max1*SET,ojd(i),ndnext(ojd(i-1)   !將ndnext(ojd(i-1)賦給ojd(i)*enddo                         !結(jié)束循環(huán)  allsel,all      

33、;               !選擇所有  nsel,all                       !選擇所有節(jié)點(diǎn)cmsel,u,cmljnod    

34、            !不選擇cmljnod，即鋼絞線對應(yīng)的節(jié)點(diǎn)*do,i,1,max1                   !i從1循環(huán)開始到max1*SET,nod1,ojd(i)        

35、0;      !將ojd(i)賦給nod1*SET,j,nnear(nod1)             !將nnear(nod1)賦給j，是指ojdi鄰近的節(jié)點(diǎn)嗎？nnear()是一個函數(shù)，表示選擇最近的節(jié)點(diǎn)。  *SET,jd(i),j            

36、60;      !將j賦給jd(i)*enddo                         !結(jié)束循環(huán)  nsel,all           

37、0;           !選擇所有節(jié)點(diǎn)*SET,ji,1                      !將1賦給ji   *do,i,1,max1        

38、;           !i從1到max1cp,ji,ux,ojd(i),jd(i)          !定義耦合自由度，ji只是隨機(jī)設(shè)置的耦合編號。ux為耦合節(jié)點(diǎn)的x方向的位移。  cp,ji+1,uy,ojd(i),jd(i)cp,ji+2,uz,ojd(i),jd(i)*SET,ji,ji+3      

39、;             !ji+3賦給ji*enddo                         !結(jié)束循環(huán)allsel,all       

40、;              !選擇所有單元*SET,ji,                       !將所有的參數(shù)刪除（第三項(xiàng)value為空格時標(biāo)識刪除）*SET,i,*SET,max1,  *SET,n

41、od1,  *SET,ojd,   *SET,jd,*SET,j,*SET,ag,*SET,eg,*SET,eh,*SET,kp0,   *SET,r0,*SET,yyl,   *SET,line1,finish                       &

42、#160;  !建模結(jié)束，進(jìn)入求解/soluallsel,allacel,9.8                       !考慮自重   solve   FINISH  /POST1       

43、                   !進(jìn)入后處理  pldisp,1etable,sigi,ls,1plls,sigi,sigi,1plnsol,s,1連續(xù)梁橋ansys 命令流建模求解 !連續(xù)梁橋 /prep7 et,1,4!定義梁單元 et,2,21 !定義mass21 單元 !定義粱材料 !泊松比!密度 mp,ex,2,3.45e10 !直線段梁材料 和1M 段梁材料 mp,nu

44、xy,2,0.2 mp,dens,2,3302.153125 mp,ex,3,3.45e10 mp,nuxy,3,0.2 mp,dens,3,3301.658695 mp,ex,4,3.45e10 mp,nuxy,4,0.2 mp,dens,4,3299.906778mp,ex,5,3.45e10 mp,nuxy,5,0.2 mp,dens,5,3298.327219 mp,ex,6,3.45e10 mp,nuxy,6,0.2 mp,dens,6,3292.351605 mp,ex,7,3.45e10 mp,nuxy,7,0.2 mp,dens,7,3284.137255 mp,ex,8,3.

45、45e10 mp,nuxy,8,0.2 mp,dens,8,3271.802136 mp,ex,9,3.45e10 mp,nuxy,9,0.2 mp,dens,9,3260.41903 mp,ex,10,3.45e10 mp,nuxy,10,0.2 mp,dens,10,3248.193657 mp,ex,11,3.45e10 mp,nuxy,11,0.2 mp,dens,11,3235.117644 mp,ex,12,3.45e10 mp,nuxy,12,0.2 mp,dens,12,3221.585664 mp,ex,13,3.45e10 mp,nuxy,13,0.2 mp,dens,13

46、,3208.826871 mp,ex,14,3.45e10 mp,nuxy,14,0.2 mp,dens,14,3194.279207 mp,ex,15,3.45e10 mp,nuxy,15,0.2 mp,dens,15,3179.924673 mp,ex,16,3.45e10 mp,nuxy,16,0.2 mp,dens,16,3166.445716mp,ex,17,3.45e10 mp,nuxy,17,0.2 mp,dens,17,3152.555731 mp,ex,18,3.45e10 mp,nuxy,18,0.2 mp,dens,18,3138.312105 mp,ex,19,3.45

47、e10 mp,nuxy,19,0.2 mp,dens,19,3124.795334 mp,ex,20,3.45e10 mp,nuxy,20,0.2 mp,dens,20,3110.7135 mp,ex,21,3.45e10 mp,nuxy,21,0.2 mp,dens,21,3097.080875 mp,ex,22,3.45e10 mp,nuxy,22,0.2 mp,dens,22,3083.186268 mp,ex,23,3.45e10 mp,nuxy,23,0.2 mp,dens,23,3068.968824 mp,ex,24,3.45e10 mp,nuxy,24,0.2 mp,dens,

48、24,3055.612436 mp,ex,25,3.45e10 mp,nuxy,25,0.2 mp,dens,25,3045.857147 mp,ex,26,3.45e10 mp,nuxy,26,0.2 mp,dens,26,3035.174287 mp,ex,27,3.45e10 mp,nuxy,27,0.2 mp,dens,27,3026.696551 mp,ex,28,3.45e10 mp,nuxy,28,0.2 mp,dens,28,3015.795365 mp,ex,29,3.45e10 mp,nuxy,29,0.2 mp,dens,29,3007.710181 mp,ex,30,3

49、.45e10 mp,nuxy,30,0.2 mp,dens,30,3000.513837 mp,ex,31,3.45e10 mp,nuxy,31,0.2 mp,dens,31,2978.611375 mp,ex,32,3.45e10 mp,nuxy,32,0.2 mp,dens,32,2958.618861 mp,ex,33,3.45e10 mp,nuxy,33,0.2 mp,dens,33,2937.888072 mp,ex,34,3.45e10 mp,nuxy,34,0.2 mp,dens,34,2919.475751 mp,ex,35,3.45e10 mp,nuxy,35,0.2 mp,

50、dens,35,2903.359983!6700 處 mp,ex,36,3.45e10mp,nuxy,36,0.2 mp,dens,36,3302.153125!可以不用 mp,ex,37,3.45e10 mp,nuxy,37,0.2 mp,dens,37,3302.153125 mp,ex,38,3.45e10!-700 處梁 mp,nuxy,38,0.2 mp,dens,38,3180.578901 mp,ex,39,3.45e10!邊支點(diǎn)橫隔板 mp,nuxy,39,0.2 mp,dens,39,2868.674818 mp,ex,40,3.45e10 !合攏段橫隔板 mp,nuxy,4

51、0,0.2 mp,dens,40,2868.674818 mp,ex,41,3.45e10 !中支點(diǎn)橫隔板 mp,nuxy,41,0.2 mp,dens,41,2757.470588 mp,ex,1,3.25e10 !定義墩材料屬性 mp,nuxy,1,0.2 mp,dens,1,2650 !定義實(shí)常數(shù) 編號 ,面積,IYY,IZZ,寬,高,RMORE,抗扭慣距 !主梁截面 r,1,11.851,28.52,215.151,16.95,4,!直線段 rmore,56.8972 r,2,11.862,28.57,215.458,16.95,4.001, !截面100 處 rmore,56.905

52、 r,3,11.871,28.91,215.622,16.95,4.009, rmore,57.345 r,4,11.903,29.03,215.78,16.95,4.025, rmore,57.938 r,5,11.932,29.626,215.88,16.95,4.049, rmore,58.502 r,6,12.043,30.402,217.093,16.95,4.081, rmore,59.768 r,7,12.199,31.407,218.899,16.95,4.121, rmore,61.445 r,8,12.441,32.716,221.806,16.95,4.169, rmor

53、e,63.652 r,9,12.673,34.21,224.418,16.95,4.226, rmore,66.058 r,10,12.932,35.94,227.279,16.95,4.290, rmore,68.801 r,11,13.221,37.941,230.512,16.95,4.362, rmore,71.948 r,12,13.534,40.233,233.872,16.95,4.442,rmore,75.432 r,13,13.843,42.747,237.133,16.95,4.530, rmore,79.173 r,14,14.213,45.688,241.054,16.

54、95,4.627, rmore,83.484 r,15,14.598,48.964,245.004,16.95,4.731, rmore,88.155 r,16,14.979,52.547,248.817,16.95,4.843, rmore,93.111 r,17,15.393,56.562,252.927,16.95,4.963, rmore,98.528 r,18,15.842,61.069,257.347,16.95,5.092, rmore,104.47 r,19,16.293,65.992,261.673,16.95,5.228, rmore,110.742 r,20,16.791

55、,71.484,266.426,16.95,5.372, rmore,117.648 r,21,17.303,77.568,271.225,16.95,5.525, rmore,124.861 r,22,17.858,84.282,276.363,16.95,5.685, rmore,132.631 r,23,18.464,91.768,281.923,16.95,5.854, rmore,141.068 r,24,19.072,99.936,287.364,16.95,6.03, rmore,149.875 r,25,19.524,108.482,291.159,16.95,6.214, r

56、more,158.46 r,26,20.084,118.046,295.597,16.95,6.407, rmore,167.857 r,27,20.536,128.202,298.9,16.95,6.607, rmore,177.137 r,28,21.148,139.669,303.86,16.95,6.816, rmore,187.495 r,29,21.626,151.737,307.186,16.95,7.032, rmore,197.507 r,30,22.07,164.734,310.057,16.95,7.257,rmore,207.681 r,31,23.541,182.22

57、5,323.433,16.95,7.490, rmore,223.527 r,32,25.066,201.932,336.467,16.95,7.730,rmore,241.046 r,33,26.871,223.700,351.448,16.95,7.979, rmore,257.765 r,34,28.707,247.928,365.663,16.95,8.235, rmore,275.922 r,35,30.533,274.36,378.934,16.95,8.500, rmore,294.461 r,46,14.58,35.599,238.702,16.95,4,rmore,238.7

58、02 !橫隔板截面 !邊支點(diǎn) r,36,35.376,54.393,339.84,16.95,4.00, rmore,128.747 !合攏段 r,37,35.376,53.405,339.84,16.95,4.00, rmore,127.015 !中支點(diǎn) r,38,71.981,454.871,543.871,16.95,8.5, rmore,684.565 !主墩截面 !截面1(實(shí)心) r,39,39.932,82.876,212.138,8,5, rmore,203.709 !截面(1/2 空心) r,40,23.863,72.571,168.024,8,5, rmore,168.491

59、 !截面3 空心) r,41,14.236,52.366,114.529,8,5, rmore,116.391 !邊墩截面 !截面1(實(shí)心1) r,42,36.113,66.217,177.703,7.7,4.7,rmore,165.119!截面2(空心1/2)r,43,20.753,35.743,99.711,7,4,rmore,88.486!截面3(空心)r,44,9.103,16.082,45.911,6.5,3.5,rmore,39.39!截面4(實(shí)心2)r,45,22.673,23.005,79.361,6.5,3.5,rmore,61.527!截面5(1/2)空心2r,49,16,

60、21.958,68.708,6.5,3.5,rmore,55.682!建立第一跨梁節(jié)點(diǎn)xl=atan(1.029/80)n,1,0,n,2,2.25,2.25*xln,3,6,6*xln,4,9,9*xln,5,11,11*xln,6,13,13*xl-0.0045n,7,15,15*xl-0.0135n,8,17,17*xl-0.023n,9,19,19*xl-0.038n,10,21,21*xl-0.062n,11,23,23*xl-0.092n,12,25,25*xl-0.1275n,13,27,27*xl-0.167n,14,29,29*xl-0.2115n,15,31,31*xl-0

61、.261n,16,33,33*xl-0.314n,17,35,35*xl-0.3715n,18,37,37*xl-0.435n,19,39,39*xl-0.502n,20,41,41*xl-0.5725n,21,43,43*xl-0.648n,22,45,45*xl-0.728n,23,47,47*xl-0.8115n,24,49,49*xl-0.8995n,25,51,51*xl-0.9925n,26,53,53*xl-1.0895n,27,55,55*xl-1.1905n,28,57,57*xl-1.325n,29,59,59*xl-1.433n,30,61,61*xl-1.5155n,3

62、1,63,63*xl-1.6325n,32,65,65*xl-1.7535n,33,67,67*xl-1.879n,34,69,69*xl-2.007n,35,71,71*xl-2.1325n,36,73,73*xl-2.2635n,37,75,75*xl-2.399n,38,77,77*xl-2.533n,39,79,79*xl-2.631xl2=atan(0.7/140)local,11,0,80,80*xl-2.631,0,xl2nsym,x,35,5,39,1!復(fù)制粱結(jié)點(diǎn)從5到39結(jié)點(diǎn)編號增加35csys,0n,75,149.6,0.15852local,12,0,150,0.1585

63、2,0,xl2nsym,x,36,40,75,1local,13,0,220,-1.6027,0nsym,x,111,1,111,1csys,0n,500,80,80*xl-2.631n,501,220,-1.6027n,502,360,-1.6148csys,0!返回普通坐標(biāo)!建立墩結(jié)點(diǎn)!PM112邊墩截面n,300,0,-2.165 !實(shí)心)2米長n,301,0,-4.365n,302,0,-9.365!(1/2空心)5M長n,303,0,-13.365n,304,0,-17.365n,305,0,-21.365n,306,0,-24.93n,307,0,-28.93n,308,0,-30

64、.63!PM113主敦截面n,309,80,0.5-6.665-0.8n,310,80,0.5-3.5-6.665!實(shí)心3.5mn,311,80,0.5-8.5-6.665!1/2(空心)5mn,312,80,0.5-12.5-6.665!(空心)4Mn,313,80,0.5-16.5-6.665!n,314,80,0.5-18.594-6.665n,315,80,0.5-22.594-6.665n,316,80,0.5-24.594-6.665+0.4!(實(shí)心)2m!pm114主墩截面n,350,220,0.5-6.665-0.8!n,351,220,0.5-3.5-6.665!1/2空心5

65、mn,352,220,0.5-8.5-6.665!(空心)5mn,353,220,0.5-12.5-6.665!空心)6.064Mn,354,220,0.5-16.5-6.665!1/2(空心)4Mn,355,220,0.5-19.294-6.665!(實(shí)心)2Mn,356,220,0.5-23.294-6.665n,357,220,0.5-25.294-6.665+0.4local,13,0,220,-1.6027,0nsym,x,17,300,316,1csys,0!生成邊跨1mat,39real,36e,1,2mat,38real,46e,2,3mat,2real,1e,3,4e,4,5

66、mat,2real,2e,5,6*do,i,3,35,1mat,ireal,ie,3+i,4+i*enddo*do,i,3,35,1mat,ireal,ie,38+i,39+i*enddo*do,i,3,35,1mat,ireal,ie,74+i,75+i*enddo*do,i,3,35,1mat,ireal,ie,114+i,115+i*enddo*do,i,3,35,1mat,ireal,ie,149+i,150+i*enddo*do,i,3,35,1mat,ireal,ie,185+i,186+i*enddomat,41real,38e,39,500mat,41real,38e,500,

67、74mat,2real,2e,41,40mat,2real,1e,40,75mat,40real,37e,75,111mat,2real,1e,111,76mat,2real,2e,76,77mat,41real,38e,110,501mat,41real,38e,501,221mat,2real,2e,188,187mat,2real,1e,187,222mat,41real,37e,222,186mat,2real,1e,186,151mat,2real,2e,151,152mat,41real,38e,185,502mat,41real,38e,502,150mat,39real,36e

68、,112,113mat,38real,46e,113,114mat,2real,1e,114,115e,115,116mat,2real,2e,116,117!建立橋墩!邊墩1mat,1real,42e,300,301mat,1real,43e,301,302mat,1real,44e,302,303mat,1real,44e,303,304mat,1real,44e,304,305mat,1real,44e,305,306mat,1real,49e,306,307mat,1real,45e,307,308!主墩1mat,1real,39e,309,310mat,1real,40e,310,3

69、11mat,1real,41e,311,312mat,1real,41e,312,313mat,1real,41e,313,314mat,1real,40e,314,315mat,1real,39e,315,316!主墩2mat,1real,39e,350,351mat,1real,40e,351,352mat,1real,41e,352,353mat,1real,41e,353,354mat,1real,41e,354,355mat,1real,40e,355,356mat,1real,39e,356,357!主墩3mat,1real,39e,326,327mat,1real,40e,327

70、,328mat,1real,41e,328,329mat,1real,41e,329,330mat,1real,41e,330,331mat,1real,40e,331,332mat,1real,39e,332,333!邊墩2mat,1real,42e,317,318mat,1real,43e,318,319mat,1real,44e,319,320mat,1real,44e,320,321mat,1real,44e,321,322mat,1real,44e,322,323mat,1real,49e,323,324mat,1real,45e,324,325!添加質(zhì)量慣距!兩米段質(zhì)量慣距r,10

71、0,1293348.4!100米處和直線段的質(zhì)量慣距r,101,1296019.6r,102,1297493r,103,1301181.8r,104,1311723r,105,1326622r,106,1348967r,107,1370728r,108,1395061r,109,1422801r,110,1452757r,111,1483258r,112,1519733r,113,1558030r,114,1597229r,115,1640292r,116,1687605r,117,1736625r,118,1790923r,119,1848602r,120,1911418r,121,1980562r,122,2052690r,123,2118097r,124,2192307r,125,2263641r,126,2350704r,127,2432292r,128,25