请解释桩基荷载命令
请解释下面桩基荷载命令：ini xdis 0.0 ydis 0.0 zdis 0.0
;
; monitor horizontal loading along pile shaft
def xf_p1
ad = top_head
xftot = 0.0
loop while ad # null
gp_pnt = mem(ad+1)
xf = gp_xfunbal(gp_pnt)
xftot = xftot + xf
ad = mem(ad)
endloop
xf_p1 = xftot
end
call p-y.fis
call servo.fis
set vel_min 5e-8 vel_max 1e-6 unb_min 10 unb_max 50 horapp 5e-8
fix z range z 0.05 0.15 group pile
;
hist gp xdis 0,0,0
hist gp xvel 0,0,0
hist horapp
hist tot_reac
hist xf_p1 不是很清楚 哎 怎么没人给你解答啊 我也很期待答案啊！ 或许是楼主的赏金少了点吧，
我希望我学习后我能回答。 ad = top_head6 q( `; K# h* j( B. H; g' A
xftot = 0.0
( C* c! p+ x1 Yc( j( L8 A& Sloop while ad # null
% r/ _/ G) x: Y9 L# Y9 k( Tgp_pnt = mem(ad+1)
4 e1 O! a! ^8 g- H! {7 Oxf = gp_xfunbal(gp_pnt)
8 n; U* }7 ?9 g# `, X7 Z4 axftot = xftot + xf! Q. z$ N. ^# H3 L4 k
ad = mem(ad)$ ]0 y% P& z1 v' i$ k\( y
endloop
$ |5 k& E3 G/ \' Q6 oDxf_p1 = xftot/ w1 g: j" W7 {9 S
end
这是叠加所有节点的不平衡力。。 这个命令流不全。。也不知道call的那两个文件是干嘛的。 ; 监测桩身水平荷载
def xf_p1
ad= top_head
xftot = 0.0
loop while ad # null
gp_pnt = mem(ad+1);
xf = gp_xfunbal(gp_pnt);计算水平向不平衡力
xftot = xftot + xf;计算水平力
ad = mem(ad)9 Y3 ；
endloop
xf_p1 = xftot ；把xftot最后计算值赋给xf_p1
end
call p-y.fis ；调用p-y.fis文件,这是一个画p-y曲线用
call servo.fis ；调用servo.fis
set vel_min 5e-8 vel_max 1e-6 unb_min 10 unb_max 50 horapp 5e-8) _8 P6 ?0 e4 j* S! `) Z( U
fix z range z 0.05 0.15 group pile
hist gp xdis 0,0,0 ；记录节点x向位移
hist gp xvel 0,0,0 ；记录速度
hist hor_app& G1 W: 6 f9 L3 Q! s, P& M；记录hor_app,在p-y.fis定义过了
hist tot_reac ；记录tot_reac，在在p-y.fis定义过了
hist xf_p1 ；记录xf_p1，在p-y.fis定义过了
这个程序主要监测桩在水平速度加载作用下的水平荷载，同时画出p-y曲线，p-y曲线部分的程序在p-y.fis里。不知道我的解释够不够清楚，希望你能够理解。
页:
[1]