做一个基坑支护，复合土钉墙，土钉按照锚杆的形式施加，
def soilnail01
loop k(1,70) ;加多列土钉
yk=1.2*k+50
k0=3*(k-1)+1
k1=k0+1
K2=k1+1
command
sel cable id=k0 beg x1w yk z1 end x11w yk z11 nseg 2 ;试验一列加土钉
sel cable id=k1 beg x2w yk z2 end x21w yk z21 nseg 2 ;试验一列加土钉
sel cable id=k2 beg x3w yk z3 end x31w yk z31 nseg 2 ;试验一列加土钉
sel cable id=k0 prop emod=t_emod, density=t_density ,xcarea=t_xcarea,gr_coh=t_gr_coh, gr_fric= t_gr_fric ,gr_k=t_gr_k, gr_per=t_gr_per,ytens=t_ytens & ycomp=t_ycomp
sel cable id=k1 prop emod=t_emod, density=t_density ,xcarea=t_xcarea,gr_coh=t_gr_coh, gr_fric= t_gr_fric ,gr_k=t_gr_k, gr_per=t_gr_per,ytens=t_ytens & ycomp=t_ycomp
sel cable id=k2 prop emod=t_emod, density=t_density ,xcarea=t_xcarea,gr_coh=t_gr_coh, gr_fric= t_gr_fric ,gr_k=t_gr_k, gr_per=t_gr_per,ytens=t_ytens & ycomp=t_ycomp
endcommand
endloop
end
soilnail01
看很多教材和案例都是这么施加，但不知道施加过程中要注意哪些关键点，只是照猫画虎，但是运行完毕后，force很小很小，修改土钉参数貌似没有影响，因此我觉得是施加过程的出现了问题，但找寻很久仍不得其因，求知道的人指点。
