gimbal_al
/prep7
csys,CSgim0
norm_cut_pln_ct,'x',0
vsel,s,loc,x,0,10
vdele,all,,,1
init_entity_num
lplot
gimbal_cres_mach.parm
csys,CSg_trq0
create_cs,0,'CSrotax0',0,0,0,0,-45,0,0
norm_cut_pln_ct,'x',0
vdele,vm-1,,,1
vadd,all
init_entity_num
lplot
et,3,solid72
msh_standrd,4,,,,,3,0.1,0.1
asel,s,area,,am-76
asel,a,area,,am-22
sfa,all,,pres,-10
asel,s,area,,am-202
nsla,s,0
d,all,all
init_entity_num
lplot
/solu
eqslv,iter,5,3
solve
FINISH
/POST1
/EFACE,1
AVPRIN,0,0,
rsys,CSgim0
PLNSOL,U,Z,0,1
create_image
save,gimbal_a,db