拱桥拱轴系数优选及主拱施工参数的计算

yzbuilder 发表于 2011-7-3 19:56:51 | 显示全部楼层 | 阅读模式
1、拱桥拱轴系数的优选
/ D" N( _5 I- C( e* D, X在做拱桥时，一般基于无铰拱的恒载压力线即悬链线进行在恒载下的必选拱轴系数，参考相关文献，认为主要控制以下几点，可确定较为合理的拱轴系数：（1）拱顶预留一定的负弯矩（2）拱脚预留一定的正弯矩（3）跨径四分点的偏心距较小。为了实现这几个参数，必须在选定跨径、矢高后，进行不同的拱轴系数下的计算，计算出上述的3个关心参数。一般通过有限元软件实现。这就需要变更有限元单元节点的坐标，如何根据选定的跨径、矢高、拱轴系数的区间，输出不同拱轴系数下的各关键点的坐标，这是个需要解决的问题。: U. R0 y4 t* l( o. {
2、主拱圈施工参数的计算
& w1 T) ~. v  Q* {在施工图阶段，选定了拱桥的跨径、矢高、拱轴系数、拱圈高度（在此认为等高），需要输出不同关键节点的拱轴坐标、对应拱圈上下点的坐标及其倾角余弦值。
9 B6 D6 R. ?' a! g" h3、程序实现' o9 V5 r; p! w/ A5 X. o- H7 ?& j
为了实现上面两个问题的快速求解，编制小程序。程序的功能是（1）计算不同拱轴系数下的拱轴关键点坐标，方便更新有限元中节点坐标，可快速求解关心的参数，方便拱轴系数的必选（2）选定拱轴系数后，可输出拱圈的施工图数据。程序的代码如下：
5 X3 {+ A6 p* K6 J& Eprogram gzzb  k7 s! D$ s& @7 X& C
implicit none
- v8 X& l1 y/ N3 W7 v+ tinteger i,j,k,n,nm,count,kc, l) @" {8 u1 k7 Z* Y; p
real l,f,ms,me,detm,x,kk,cosi,m,y0,y1,y2,h,w,cosb
/ l8 ^$ `5 {0 Hreal,allocatable:: y(:),mi(:)) R+ O2 X0 J8 l# X: _) b
character*24 fname,dat,out
0 Z+ o+ R3 [7 t) X4 tread(*,'(a\)')fname& \& L- r4 l! D
k=len_trim(fname)
1 c. r4 f. E. T0 vdat=fname(1:k)//'.txt'3 p  p+ V, @$ r2 W$ V
out=fname(1:k)//'.out'
$ u& p: l' x; ?; d! Hopen(10,file=dat,status='old'). h4 g) s* n8 ]1 Q- A" B$ R% v& P
read(10,*)kc. m1 y- M1 b+ V5 w2 x/ {; Q, `/ l
if(kc==1)then !进行拱轴系数优选，计算不同拱轴系数下的拱轴坐标1 n" h' u5 J4 `( U
read(10,*)n,l,f,ms,me,detm
9 z/ a6 k" C1 V' D% @/ `! v% \# ^else
6 R" y  m7 t7 p" Yread(10,*)n,l,f,m,h
  _7 G1 ?. }1 L8 Tendif" n1 ]8 D& U$ |! v; \8 V
close(10)7 `7 Y# Z5 r! F
open(11,file=out)" O' m' F% O" D
if(kc==1)then
1 A, Y# \3 C4 r: S1 N* h% }" ]( mwrite(11,'(12x,a)')'不同拱轴系数下拱轴线坐标计算程序'
) \) o' v# t# w- a- @+ D( `9 Lelse
3 z" N  ~. X3 _. Uwrite(11,'(12x,a)')'等截面拱圈坐标输出程序（可作施工图数据）'
" F5 q+ z. P3 P6 N' y$ Hendif% m' G+ t3 S( L8 h( c# w' W
write(11,'(a)')'If you have any problem, you can contact with me! E_mail:yzbuilder@163.com'9 u, F2 x. T/ c7 Z$ H
if(kc==1)then !不同拱轴系数下拱轴坐标的计算) a* C/ U  y! ?/ N( c+ k( [
nm=int((me-ms)/detm)+1
9 ]6 b* M) ]/ P4 x& z4 uallocate(y(nm+1),mi(nm+1))
8 s" j/ |1 Z0 M+ [! @+ b, }do i=1,nm+1# J3 m  w/ I1 l4 H& {8 V
mi(i)=ms+(i-1)*detm
1 \+ Z2 P+ s8 ^9 U  ^2 e/ p# Ienddo4 e5 p+ b+ t: V, k+ @, J: P' w6 e4 j
write(11,'(a8,1x,a8,1x,100(f7.3,1x))')'SEC NO.','X cor',(mi(i),i=1,nm+1)
4 d/ C. ~7 _% [. u  Qdo i=0,n/2,1 !section number
9 F' J8 F$ G; @9 jcosi=i*(l/n)/(0.5*l)
$ {( \6 _7 X/ J% i0 ddo j=1,nm+1,1) [, S$ L$ Q: O0 {  y6 ~6 I
m=ms+(j-1)*detm
, ~+ l% Y6 C$ U8 S- zkk=log(m+sqrt(m**2-1))) b/ V7 v9 T) {% C# j5 B9 S5 Z7 t9 f
y(j)=1-(cosh(kk*(1-cosi))-1)/(m-1)
( h+ [6 y0 @* G: Q4 E5 D, l9 ly(j)=y(j)*f9 Z  ^  I9 f+ Y9 C, V
enddo
$ U- c/ |# X! g: `; b9 b4 Cwrite(11,'(i8,1x,f8.3,1x,100(f7.3,1x))')i,i*l/n,(y(k),k=1,nm+1)
9 P4 A; b- z! y, R& F" [enddo) l/ V' U- I4 z& p; `% P# ~
count=01 n# s6 l! |2 x/ t. r
do i=n/2-1,0,-12 }+ f- _) g" A) w
count=count+1" P, I# G- U5 J# ]
cosi=i*(l/n)/(0.5*l)
$ R) K. W+ k3 J* `do j=1,nm+1,1
3 N" h# X2 x) J5 Pm=ms+(j-1)*detm# l$ q4 D* U& z  q9 c- G* {
kk=log(m+sqrt(m**2-1))8 \; g. E) }; h) l! P
y(j)=1-(cosh(kk*(1-cosi))-1)/(m-1); C0 q- B1 \, c1 `$ V' F
y(j)=y(j)*f# e% z# {) s' T9 i; V1 a* O
enddo
, k  i. `0 ~+ K6 ~+ d* L    write(11,'(i8,1x,f8.3,1x,100(f7.3,1x))')i+2*count,l/2+count*l/n,(y(k),k=1,nm+1)
+ A5 i% D/ |2 tenddo8 T, [$ ~, n1 N8 t9 Z
else !选定拱轴系数后，计算拱轴坐标及拱圈上下点的坐标，方便施工图相关数据的输出, N8 W# {2 J+ q; R& N/ h9 W$ q
    write(11,'(a8,1x,a8,1x,4(a7,1x))')'SEC NO.','X cor','y0','y1','y2','cosB'8 `, L' T4 ]$ n4 h) X
do i=0,n/2,1 !section number4 v& H- K  v* Z, ^6 b3 m
cosi=i*(l/n)/(0.5*l)
0 ?, m% [8 v. S# q0 x8 Gkk=log(m+sqrt(m**2-1))) d( B- z1 d4 P  T1 U: \
y0=1-(cosh(kk*(1-cosi))-1)/(m-1). I7 y% j+ N: r9 [: _
y0=y0*f
( M9 k) F: P0 `# Z7 k3 Gw=f*kk/(0.5*l*(m-1))*sinh(kk*(1-cosi))
% t* P( o# @0 I: R% Ycosb=1/sqrt(w**2+1). Z4 k' U& o  ]- A0 a! L" i
y1=y0+h/2/cosb2 A( W. |5 W) |# `" {6 l
y2=y0-h/2/cosb
( x) x5 U* ~9 c& p, Lwrite(11,'(i8,1x,f8.3,1x,4(f7.4,1x))')i,i*l/n,y0,y1,y2,cosB
% m& P, @& r6 Q0 L9 e" Venddo" |4 C0 L, v3 B) t: t2 ~- f8 s
count=0( w% t# `7 @9 n& Q: [3 p
do i=n/2-1,0,-1
+ F5 }; U+ S) W4 T4 f5 ~count=count+11 k# L8 Y! [8 S, C/ P: P1 ^4 M
cosi=i*(l/n)/(0.5*l)
/ b% Z- o5 d: @7 okk=log(m+sqrt(m**2-1))
# @/ B+ H. P- s3 p) S% j# A8 n3 P5 `- Jy0=1-(cosh(kk*(1-cosi))-1)/(m-1)! T4 q5 O6 ^$ i6 ]! V
y0=y0*f3 B4 S, C  ]. r6 O" x& r
w=f*kk/(0.5*l*(m-1))*sinh(kk*(1-cosi))
/ ]8 N: S& R3 C$ f; p6 [cosb=1/sqrt(w**2+1)  B5 C! \; T6 Q$ E4 l' @: s2 E
y1=y0+h/2/cosb& p" g5 g) }: [2 G5 Q. Y: C( m! l
y2=y0-h/2/cosb
4 [  s+ K/ |, Z: b0 lwrite(11,'(i8,1x,f8.3,1x,4(f7.4,1x))')i+2*count,l/2+count*l/n,y0,y1,y2,cosB
! ?9 R" o0 b; d1 J- tenddo) ?3 n7 L; v) p+ ~4 I
endif
+ E6 B% Q, c5 O, Bend program gzzb- {3 O- w  K/ ~8 l
4、实例计算$ e! c' Y5 _# |: r1 j; q! @7 ~
（1）不同拱轴系数下的拱轴坐标的输出
3 k( O1 W$ J' C6 f$ Q! C6 K- F某钢筋混凝土拱桥，计算跨径为140m，矢高17.5m。试进行拱轴系数介于1.5和2.3之间的拱轴坐标的计算，沿拱桥跨径方向等分48等份。
1 p, g! k& U1 T" T( V数据文件gq.txt的文件内容如下：
( V1 V: E1 R; [% V7 \6 t1
" i% R- ?6 u: I& O1 W" F48,140,17.5,2.0,2.3,0.05
" f/ Y7 @) X0 T; X运行程序后结果文件内容如下：
" X, a# ~( Q' L0 D! I' G不同拱轴系数下拱轴线坐标计算程序" c0 i' o3 x; F8 F4 g1 `
If you have any problem, you can contact with me! E_mail:yzbuilder@163.com, b* z' W4 [4 Y$ I0 F6 L5 K% u
SEC NO.    X cor   2.000   2.050   2.100   2.150   2.200   2.250   2.300
! o; L$ z( K! p6 A       0    0.000   0.000   0.000   0.000   0.000   0.000   0.000   0.000/ k( S' U+ c& O: V0 |
       1    2.917   1.611   1.619   1.627   1.634   1.642   1.649   1.656; D! x2 g6 J9 X8 \$ e" j
       2    5.833   3.122   3.136   3.149   3.163   3.176   3.189   3.2024 p6 d- r! n% e& X
       3    8.750   4.537   4.555   4.573   4.591   4.608   4.625   4.642
8 n0 B1 y0 V2 }2 i- q5 i       4   11.667   5.860   5.881   5.902   5.923   5.944   5.964   5.983
9 H, Q% y. e+ f0 Z" G& Y       5   14.583   7.095   7.119   7.142   7.164   7.187   7.209   7.230
  `3 F( t  `! y; G/ L       6   17.500   8.247   8.271   8.295   8.319   8.342   8.365   8.387$ ?+ |9 f# C- t9 ^+ q! f. Q+ m
       7   20.417   9.317   9.342   9.366   9.390   9.413   9.436   9.459% d* ?( t' N. S" K+ J  w* Z9 z
       8   23.333  10.311  10.335  10.358  10.382  10.405  10.427  10.450
! }# v6 Z2 h6 u0 b8 w       9   26.250  11.230  11.253  11.275  11.298  11.320  11.341  11.363
. V# G8 }( J8 P: `6 Y      10   29.167  12.077  12.099  12.120  12.141  12.161  12.182  12.2024 l+ w. {2 Y/ U/ _, l
      11   32.083  12.855  12.875  12.895  12.914  12.933  12.951  12.970
# R* j( ^" k5 w4 G2 X: j. Y. a      12   35.000  13.567  13.585  13.602  13.620  13.637  13.653  13.670, N+ V; e( S- L
      13   37.917  14.214  14.230  14.245  14.261  14.275  14.290  14.3053 F3 f+ v/ G6 S3 b: I7 G2 P# n
      14   40.833  14.799  14.812  14.825  14.839  14.851  14.864  14.877
0 e* D5 b' J3 K6 [      15   43.750  15.322  15.334  15.345  15.356  15.367  15.377  15.3889 o: W$ G3 C" M: r9 u
      16   46.667  15.787  15.796  15.805  15.814  15.823  15.831  15.840
7 s! U& ?/ V6 L4 b9 [      17   49.583  16.193  16.200  16.207  16.215  16.221  16.228  16.2354 S8 y8 o; ~0 v
      18   52.500  16.543  16.548  16.554  16.559  16.564  16.569  16.5746 |0 w. {- }$ g" Y% x
      19   55.417  16.837  16.841  16.845  16.849  16.852  16.856  16.859* h) {/ G6 o$ C+ L$ F
      20   58.333  17.077  17.079  17.082  17.084  17.087  17.089  17.091
1 L4 q. k3 y/ n- Q/ \. O. H      21   61.250  17.262  17.264  17.265  17.267  17.268  17.269  17.271
1 k  M6 D4 ?, {  H& q      22   64.167  17.395  17.395  17.396  17.396  17.397  17.398  17.3982 v* w$ K) y0 W8 n; a% z* }- @4 r
      23   67.083  17.474  17.474  17.474  17.474  17.474  17.474  17.4756 X* G+ {6 _( A3 n. g
      24   70.000  17.500  17.500  17.500  17.500  17.500  17.500  17.500- k* y+ R% y, b1 l# Y
      25   72.917  17.474  17.474  17.474  17.474  17.474  17.474  17.475
+ f  x7 r# o! g# g4 v7 @; Q5 e      26   75.833  17.395  17.395  17.396  17.396  17.397  17.398  17.398
! x; \% {: l4 I9 D8 \8 k, i0 P7 ^      27   78.750  17.262  17.264  17.265  17.267  17.268  17.269  17.271* O8 w. W# c: J. W
      28   81.667  17.077  17.079  17.082  17.084  17.087  17.089  17.091
8 I% J! q, N* \0 [, H  t* @! p      29   84.583  16.837  16.841  16.845  16.849  16.852  16.856  16.859# v( L3 Q8 x+ _0 L
      30   87.500  16.543  16.548  16.554  16.559  16.564  16.569  16.574
2 Z  [$ \4 r2 {3 P& R# V  l5 w      31   90.417  16.193  16.200  16.207  16.215  16.221  16.228  16.235) \0 k$ f4 X+ C, {7 e( Y- E. t, G
      32   93.333  15.787  15.796  15.805  15.814  15.823  15.831  15.8405 F; E  f, I; Y' {) j
      33   96.250  15.322  15.334  15.345  15.356  15.367  15.377  15.388: V: V) m  w9 A! [
      34   99.167  14.799  14.812  14.825  14.839  14.851  14.864  14.8779 d" p2 a: r; m8 O
      35  102.083  14.214  14.230  14.245  14.261  14.275  14.290  14.305
; v9 e- H5 Q/ T" f- K; X      36  105.000  13.567  13.585  13.602  13.620  13.637  13.653  13.670
) e( w& n7 x5 O6 ~( v      37  107.917  12.855  12.875  12.895  12.914  12.933  12.951  12.970
8 A* s* P+ K5 q/ @% L+ j7 ~      38  110.833  12.077  12.099  12.120  12.141  12.161  12.182  12.202
* J  q: a, R+ D6 b      39  113.750  11.230  11.253  11.275  11.298  11.320  11.341  11.363/ L# c1 b, J1 g. t+ X; ^
      40  116.667  10.311  10.335  10.358  10.382  10.405  10.427  10.450
1 c" ~8 Y5 K; J; l7 K7 W) i: F      41  119.583   9.317   9.342   9.366   9.390   9.413   9.436   9.4595 ^5 t. F( y+ h8 b9 l/ W' }2 R* g4 E
      42  122.500   8.247   8.271   8.295   8.319   8.342   8.365   8.387' [8 `+ u( P8 c0 M( F
      43  125.417   7.095   7.119   7.142   7.164   7.187   7.209   7.230/ g$ o& C! K; y1 D  y9 q) V1 [8 ?  f
      44  128.333   5.860   5.881   5.902   5.923   5.944   5.964   5.983
1 U; h/ X: ]! b  g: k' a9 S$ a      45  131.250   4.537   4.555   4.573   4.591   4.608   4.625   4.642
+ F' a" s  |! o! I      46  134.167   3.122   3.136   3.149   3.163   3.176   3.189   3.202' R: a) u# w! K5 }! y  a
      47  137.083   1.611   1.619   1.627   1.634   1.642   1.649   1.656
9 Z4 J1 I7 D$ Q$ P, D      48  140.000   0.000   0.000   0.000   0.000   0.000   0.000   0.000% x" A1 R4 a9 A6 H
2、选定拱轴系数后，拱轴坐标及拱圈上下点坐标，及余弦值
+ W% f/ R& d( Q0 l9 M$ R仍以上个例题为算例，选定拱轴系数为2.24，拱圈高度3m，沿跨径方向48等分。
& K/ v- O% A! {) p数据文件内容如下：1 R7 [6 ~& O" F% @
2  Z' M4 M: C3 Y/ m+ G
48,140,17.5,2.24,3
2 M$ ]$ ?" Z. T0 I6 S  L# ^- @运行程序后结果文件如下：
0 S' a( m" I: r; s+ t            等截面拱圈坐标输出程序（可作施工图数据）* T$ @+ _% |2 C7 T, X' S
If you have any problem, you can contact with me! E_mail:yzbuilder@163.com+ S& o9 n1 y# O" x/ R! k# w! [
SEC NO.    X cor      y0      y1      y2    cosB& y5 p% F7 Q6 D9 Q6 Y5 Q; O9 x" E) R
       0    0.000  0.0000  1.7372 -1.7372  0.8635
* m- n. ?+ L, }) v+ {       1    2.917  1.6475  3.3565 -0.0614  0.87776 g/ Q! T  y; E. O3 f, p
       2    5.833  3.1863  4.8699  1.5028  0.8910+ L0 R) C+ L; h
       3    8.750  4.6219  6.2827  2.9612  0.9032- p0 H5 {% @& O! _/ D, l
       4   11.667  5.9596  7.5999  4.3194  0.9145$ E. S/ \$ W+ _) K2 u/ _# e) m
       5   14.583  7.2042  8.8261  5.5823  0.92483 |& M# b9 M. G, C
       6   17.500  8.3602  9.9657  6.7546  0.9343
! n! P" E' {* k' v       7   20.417  9.4318 11.0227  7.8409  0.9429
0 X6 y+ t  a: h- S       8   23.333 10.4229 12.0008  8.8450  0.9506
9 ]* K3 v1 n* Q& T4 [       9   26.250 11.3371 12.9034  9.7707  0.95778 i3 s4 Z0 h. S; f% l; I# Z4 c
      10   29.167 12.1777 13.7338 10.6216  0.9640
6 }; V, Q1 O4 a3 o1 L5 C      11   32.083 12.9478 14.4948 11.4008  0.96963 V  i- y; X: }
      12   35.000 13.6501 15.1891 12.1111  0.9747
! F* h: j# ^# l+ Z, r2 K5 h* Q, N      13   37.917 14.2873 15.8192 12.7553  0.9791
$ d9 g- ?+ n/ Q      14   40.833 14.8615 16.3874 13.3357  0.9831' m& J; y$ e9 }( w
      15   43.750 15.3750 16.8955 13.8545  0.9865
1 T* R/ r' G- Q' M      16   46.667 15.8296 17.3455 14.3137  0.9895
+ Z; I; c9 Y0 P      17   49.583 16.2268 17.7388 14.7149  0.9921/ N2 S9 {+ f* r# N1 B% C" D: e
      18   52.500 16.5683 18.0769 15.0596  0.9943
8 R: f7 ~1 T: @& n$ D      19   55.417 16.8551 18.3611 15.3492  0.9961
: Z" k" y% N. n9 C6 `      20   58.333 17.0884 18.5922 15.5846  0.9975
0 F' E% ^4 i, I& F      21   61.250 17.2690 18.7711 15.7669  0.9986
, h) q+ i4 ~3 u5 p' F+ o      22   64.167 17.3975 18.8984 15.8965  0.9994
! r% a4 i( M; N+ d. W$ ?      23   67.083 17.4744 18.9746 15.9742  0.99988 ~2 L4 s: e3 H; |- I; f
      24   70.000 17.5000 19.0000 16.0000  1.0000# \& Z6 J" K' w1 A+ B7 Q
      25   72.917 17.4744 18.9746 15.9742  0.99982 I+ i5 {" ?1 W; V: P  H% f7 K
      26   75.833 17.3975 18.8984 15.8965  0.9994
% Q; k1 Q% D! X# K: v# W8 U      27   78.750 17.2690 18.7711 15.7669  0.9986
. _; @5 v: u8 a4 K& I      28   81.667 17.0884 18.5922 15.5846  0.9975
4 C  O9 K; C1 \3 q      29   84.583 16.8551 18.3611 15.3492  0.9961
8 F$ A7 n* D9 `, E. j+ }      30   87.500 16.5683 18.0769 15.0596  0.99433 T  `" S$ B8 O; w4 `! ]
      31   90.417 16.2268 17.7388 14.7149  0.9921* j0 B  D7 r1 F, Q9 Q, k
      32   93.333 15.8296 17.3455 14.3137  0.9895
& r$ M- m, {9 @( c      33   96.250 15.3750 16.8955 13.8545  0.9865- _+ {- O+ c& g1 q3 _2 [2 u
      34   99.167 14.8615 16.3874 13.3357  0.9831
8 H: U0 m# f$ d9 {) }5 n+ G* {9 \+ q      35  102.083 14.2873 15.8192 12.7553  0.97915 f/ f. u8 N& W# }
      36  105.000 13.6501 15.1891 12.1111  0.9747% W1 ~" \, G! @5 r' M
      37  107.917 12.9478 14.4948 11.4008  0.9696* \: r5 H! `! }7 I: E
      38  110.833 12.1777 13.7338 10.6216  0.9640
5 h' \7 |7 W) H3 l      39  113.750 11.3371 12.9034  9.7707  0.9577
4 A  I2 c/ G& l$ P! k/ }7 p      40  116.667 10.4229 12.0008  8.8450  0.9506' `0 y2 y) y+ h1 y( v) v7 V
      41  119.583  9.4318 11.0227  7.8409  0.9429& N' u2 m" W; e" A2 D0 s; z
      42  122.500  8.3602  9.9657  6.7546  0.9343
- U% a$ u: F8 o, Y      43  125.417  7.2042  8.8261  5.5823  0.9248
( |! v* s0 k7 m5 x$ n0 j/ {" b! n      44  128.333  5.9596  7.5999  4.3194  0.91451 A2 M3 ^9 a; _8 I+ @1 f" D4 q
      45  131.250  4.6219  6.2827  2.9612  0.9032
- i( @& s9 k" H+ n      46  134.167  3.1863  4.8699  1.5028  0.8910
3 a' @) f" V, K' D' U. q      47  137.083  1.6475  3.3565 -0.0614  0.8777
$ b; _" t- A4 d" v  ]      48  140.000  0.0000  1.7372 -1.7372  0.8635: ?7 p- E5 F  e  B* d
: G0 ^2 {5 p( q- `8 Y, N
拱轴系数

本帖被以下淘专辑推荐:

使用道具 举报 回复
精彩评论正序浏览

1.9万查看12评论

jiegoushej... 发表于 2018-7-10 09:28:41
感谢楼主分享 相关经验
举报 回复
菜子邓 发表于 2015-3-27 17:23:19
非常感谢楼主。。。。。。。。。
举报 回复
125752214 发表于 2015-1-18 18:07:23
楼主，帮我看看这个问题怎么解决呢？？同样是拱轴系数与起始角度的问题，谢谢  http://www.bridgehead.com.cn/thread-54823-1-1.html
举报 回复
超越梦想... 发表于 2013-7-29 17:36:39
楼主，程序怎么用的？
举报 回复
jinzhulaod... 发表于 2013-6-5 17:56:13
最近搞了个拱桥的方案，搞的很吃力。) Q; n$ ~/ l" g5 v  |) Y, d3 N8 D  V4 J
非常谢谢楼主的分享，值得学习。
举报 回复
bubba 发表于 2013-4-1 09:51:11
这个正需要，先收下
举报 回复
ftyl 发表于 2013-4-1 00:43:33
这个用excel也很方便实现。
举报 回复
huangtang7 发表于 2012-3-18 14:04:25
其实我觉得在钢筋混凝土拱桥来说，拱轴系数并不是唯一的决定因素，还要和桥位的地质情况以及桥梁的施工方案有关，比如说在软土地区，共轴系数就不能过大，一般不超过2.24.
举报 回复
shekarry 发表于 2011-7-5 15:19:21
楼主真是高手，程序挺好用的，谢谢分享
举报 回复
yzbuilder 发表于 2011-7-4 19:04:17
贴出的是fortran源代码，只要编译一下就可以。
6 j7 f9 {! w: p6 |# J介绍一下数据文件的格式$ H1 U2 Q: i  N3 M0 v0 N5 u
1、不同拱轴系数下的拱轴坐标的计算- B% c* ^1 Q  N8 H
该数据文件共有两行
6 b1 a6 H+ A+ v8 i- D! R2 d如上例
% @- i: M' \6 [6 h% {8 K! O$ {1
  t' z) A1 _- O8 Z2 x: x0 Q48,140,17.5,2.0,2.3,0.05
" ~+ ?5 \- P; n+ I8 [: i2 _# j第一行的“1”表示本次计算类型，即不同拱轴系数下的拱轴坐标的计算) c; _) ^- T' `( M3 u$ |* u/ u
第二行为本次计算的数据，分别是等分段数、跨径、矢高、拱轴系数起始值、拱轴系数终了值、拱轴系数增量  v& r$ a. Z. T/ a! T. J
将上述数据文件存放在记事本中，并另存为gq.txt，运行附件中的exe可执行文件，输入gq并回车，即可在当前目录下生成结果文件。8 `( z+ _$ B8 K+ K( z" p, q5 i3 Y
2、选定拱轴系数的拱轴施工参数的计算5 f& N' V% s' f) I- {/ R) ~2 g
该数据文件共有两行
& _6 L' [" j3 ^( l  O( y& k如上例
8 G; f: a  v8 w: S5 x2
+ s$ R# q" B# O1 c& b48,140,17.5,2.24,3
& _4 D7 f8 A/ v; p) m3 B第一行的“2”表示本次计算类型，即选定拱轴系数的拱轴施工参数的计算' s7 ]8 |( E' \3 w
第二行为本次计算的数据，分别是等分段数、跨径、矢高、拱轴系数、拱圈高。
! v' x0 s4 I- b1 C& B, H将上述数据文件存放在记事本中，并另存为gq1.txt，运行附件中的exe可执行文件，输入gq1并回车，即可在当前目录下生成结果文件。: M* G, X. m1 ]2 t: ]7 t, d! g# T
注意，一定要让数据文件和可执行的计算文件位于同一目录下，否则发生找不到数据文件而不能计算的结果。) U( n/ x% x: b; p' N3 r0 E

拱轴参数计算程序.rar

156.58 KB, 下载次数: 424

评分

参与人数 1堡币 +5 威望 +2 收起 理由
redflag + 5 + 2 很给力!

查看全部评分

举报 回复
狂飙一路... 发表于 2011-7-4 08:55:17
楼主程序不错，不知道该怎么用？
举报 回复
shekarry 发表于 2011-7-4 08:04:50
楼主程序不错，不知道该怎么用？
举报 回复
发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

yzbuilder 实名认证实名认证

工程师

  • 0

    关注

  • 0

    粉丝

  • 2

    主题

TA 的主题

相关帖子

 
 
  • QQ：56984982
    		•
    点击这里给我发消息
    电话：13527553862
    站务咨询群桥头堡站务咨询桥梁专业交流群：
    中国桥梁专业领袖群
    工作时间
    8:00-18:00
    网站地图小黑屋手机版Archiver桥梁论坛专业领导者 渝ICP备11004164号-1|重庆公安备案:2012004611
    Copyright © 2001-2021 Qiaotoubao Inc.