!ex4.10利用荷載梯度在柱坐標系下的施加方法
finish
/clear
/prep7
csys,1
k,1,10,-90
k,2,10,90
k,3,10,90,30
l,1,2
l,2,3
adrag,1,,,,,,2
ldele,2,,,1
numcmp,all
et,1,63
esize,2
amesh,all
sfgrad,pres,1,y,-90,1
sfa,all,2,pres,400
sftran	
!可考察下述命令及其施加方法
!①
!sfgrad,pres,1,y,270,1
sfa,all,2,pres,400
sftran
!②
!local,12,1
cscir,12,1
sfgrad,pres,12,y,270,1
sfa,all,2,pres,400
sftran