📄 buckle2.txt
字号:
finish
/clear
/filname,exercise4
/prep7
/title,large deflections of a buckled bar(the elastic)
et,1,beam3,,,,,,1
r,1,0.25,52083e-7,0.5
mp,ex,1,3e7
mp,prxy,1,0.3
n,1
n,11,,100
fill
e,1,2
egen,10,1,1
finish
/solu
antype,static
nlgeom,on
neqit,150
outpr,basic,last
d,1,all
fcr=-38.55
PI=3.1415926
f,11,fy,fcr*1.015
f,11,fx,0.5
solve
fDELE,11,fx
f,11,fy,fcr*1.063
solve
f,11,fy,fcr*1.152
solve
f,11,fy,fcr*1.293
solve
f,11,fy,fcr*1.518
solve
f,11,fy,fcr*1.884
solve
/post1
/user
/focus,,50,50
/dscale,,1
/dist,,55
set,1,0
pldisp,1
/noerase
set,2,0
pldisp,1
set,3,0
pldisp,1
*get,ux3,node,11,u,x
*get,uy3,node,11,u,y
*get,rot3A,node,11,ROT,Z
set,4,0
pldisp,1
*get,ux4,node,11,u,x
*get,uy4,node,11,u,y
*get,rot4A,node,11,ROT,Z
set,5,0
pldisp,1
*get,ux5,node,11,u,x
*get,uy5,node,11,u,y
*get,rot5A,node,11,ROT,Z
set,6,0
pldisp,1
*get,ux6,node,11,u,x
*get,uy6,node,11,u,y
*get,rot6A,node,11,ROT,Z
*set,rot6,(180*rot6A/PI)
*set,rot5,(180*rot5A/PI)
*set,rot4,(180*rot4A/PI)
*set,rot3,(180*rot3A/PI)
*STATUS,PARM
FINISH
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -