路基上無縫線路課程設(shè)計-閱讀頁
2025-04-23 00:42本頁面
【正文】 降溫幅度為 ℃ （ 3）根據(jù)穩(wěn)定條件計算允許的升溫幅度： 6[ ] 1 9 7 0 8 1 5 . 7 8[ ] 5 1 . 3 42 2 2 1 0 0 0 0 1 1 . 8 1 0 7 7 4 5c PNtCEF? ?? ? ?? ? ? ? 0 （ 4）鎖定軌溫的確定： m a x m i n [ ] [ ]22dcekT T t ttt? ? ? ?? ? ? ? =（ ） /2+()/2=℃ 則鎖定軌溫上限為： tmax=tg+5℃ =℃ 則鎖定軌溫下限為： tmin=tg5℃ =℃ 計算長軌和 緩沖 軌間預(yù)留縫 a1和緩沖軌與緩沖軌間的預(yù)留縫 a2 （如下圖） （ 1） 長軌條一端伸縮量Δ 長 由以下公式計算： （ 2）緩沖軌一端伸縮量Δ 緩 由以下公式計算： （ 3）根據(jù) 預(yù)留軌縫的原則 ①冬季軌縫不應(yīng)超過構(gòu)造軌縫可得： ②夏季軌縫不頂緊可得： （ 4） 伸縮區(qū)長度可按下式計算： （ 5） 鋼軌溫度力可按下式計算： 用程序③計算長軌和 緩沖 軌間預(yù)留縫 a1 請輸入鋼軌截面面積 F: 7745 請輸入鋼軌軌枕間距 a: 600 請輸入鋼軌彈性模量 E: 210000 請輸入鋼軌每枕縱向阻力 r2: 12021 請輸入鋼軌的線膨脹系數(shù) w: 請輸入相鄰標準軌間預(yù)留軌縫 lg: 18 請輸入鋼軌接頭阻力 pH: 490000 請輸入最高軌溫 Tmax: 請輸入最低軌溫 Tmin: 請輸入標準軌的長度 L: 25 當溫度為 當溫度為 當溫度為 當溫度為 當溫度為 當溫度為 當溫度為 當溫度為 當溫度為 當溫度為 當溫度為 Press any key to continue 用程序④計算緩沖軌與緩沖軌間的預(yù)留縫 a2 請輸入鋼軌截面面積 F: 7745 請輸入鋼軌軌枕間距 a: 600 請輸入鋼軌彈性模量 E: 210000 請輸入鋼軌每枕縱向阻力 r2: 12021 請輸入鋼軌的線膨脹系數(shù) w: 請輸入相鄰標準軌間預(yù)留軌縫 lg: 18 請輸入鋼軌接頭阻力 pH: 490000 請輸入最高軌溫 Tmax: 請輸入最低軌溫 Tmin: 請輸入標準軌的長度 L: 25 當溫度為 當溫度為 當溫度為 當溫度為 當溫度為 當溫度為 當溫度為 軌預(yù)留軌 縫為 當溫度為 當溫度為 當溫度為 當溫度為 Press any key to continue 附表一：源程序如下 ② 計算動彎矩 Md include include void main() { double D,a,u,k,E,Ix,y0,M0,R0,P0i,xi,x1。 printf(請輸入鋼軌支座剛度 D:\n)。D)。 scanf(%lf,amp。 printf(請輸入鋼軌彈性模量 E:\n)。E)。 scanf(%lf,amp。 printf(請輸入機車的輪重 P0i:\n)。P0i)。 scanf(%lf,amp。 u=D/a。 k=sqrt(sqrt(x1))。 printf(鋼軌基礎(chǔ)彈性模量 u=%\n,u)。 printf(靜彎矩 M0=%\n,M0)。 scanf(%lf,amp。 printf(請輸入軌道的未被平衡超高值 ho:\n)。ho)。 bo=*ho。 printf(鋼軌上的動彎矩為 Md=%lf\n,Md)。 double f=,q,p00,c,d,l2,f0e,l,f0e1。 void findL(double a,double a0){ double a1,b1。 if(d=2){ b1=(a*a*b)/(400*400)。 printf(重新計算后的 l=%lf\n,a1)。 findL(a1,a)。 printf(請輸入彈性初始彎矩矢度 f0e:\n)。f0e)。 scanf(%lf,amp。 printf(請輸入 鋼軌彈性模量 e:\n)。e)。 scanf(%lf,amp。 printf(請輸入等效道床阻力 q:\n)。q)。 r0=(l0*l0)/(8*f0p)。 c=2*e*iy*PAI*PAI。 l=sqrt(l2)。 b=f0e1。 findL(l,l0)。 j=(((f+f0e)*(pow(PAI,3)))/(4*l2))+(1/r1)。 p00=p/K。 printf(計算誤差為 d=%lf\n,d)。 } 3 計算長軌和緩沖軌間預(yù)留縫 include include void main() { double T[11]={ ,2,}, double a,r,r2,E,F,w,pt1,pt2,pH,lc1,ld1,lc2,ld2,l1,l2,l,lg,Tmax,Tmin ,L。 printf(請輸入鋼軌截面面積 F:\n)。F)。 scanf(%lf,amp。 printf(請輸入鋼軌彈性模量 E:\n)。E)。 scanf(%lf,amp。 printf(請輸入鋼軌的線膨脹系數(shù) w:\n)。w)。 scanf(%lf,amp。 printf(請輸入鋼軌接頭阻力 pH:\n)。pH)。 scanf(%lf,amp。 printf(請輸入最低軌溫 Tmin:\n)。Tmin)。 scanf(%lf,amp。 r=r2/(2*a)。i11。 lc1=(pt1pH)*(pt1pH)/(2*E*F*r)。 pt2=F*E*w*(TmaxT[i])。 ld2=((pt2pH)*Lr*L*L/4)/(2*E*F)。 l2=lc2+ld2。 printf(當溫度為 %lf鋼軌預(yù)留軌縫為 %lf\n,T[i],l)。 int i。 scanf(%lf,amp。 printf(請輸入鋼軌軌枕間距 a:\n)。a)。 scanf(%lf,amp。 printf(請輸入鋼軌每枕縱向阻力 r2:\n)。r2)。 scanf(%lf,amp。 printf(請輸入相鄰標準軌間預(yù)留軌縫 lg:\n)。lg)。 scanf(%lf,amp。 printf(請輸入最高軌溫 Tmax:\n)。Tmax)。 scanf(%lf,amp。 printf(請輸入標準軌的長度 L:\n)。L)。 for(i=0。i++){ pt1=F*E*w*(T[i]Tmin)。 ld1=((pt1pH)*Lr*L*L/4)/(2*E*F)。 lc2=((pt2pH)*Lr*L*L/4)/(2*E*F)。 l1=lglc1ld1。 l=(l1+l2)/2。 } }
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1