/FILNAME,ma,1
/PREP7
a=10
b=10
ALPH=0
TEMP=0
ET,1,PLANE42
KEYOPT,1,1,0
KEYOPT,1,2,0
KEYOPT,1,3,2
KEYOPT,1,5,0
KEYOPT,1,6,0
MP,EX,1,72e3
MP,PRXY,1,0.33
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,2,,30e3
MPDATA,PRXY,2,,0.33
RECTNG,0,a,0,b
allsel,
esize,1
TYPE,1
MAT,1
MSHAPE,0,2D
MSHKEY,1
amesh,all
csys,0
nsel,s,loc,x,a/6,5*a/6
nsel,r,loc,y,b/6,5*b/6
ESLN,S,0
MPCHG,2,all,
allsel
nsel,S,LOC,X,0
nsel,U,LOC,Y,0
nsel,U,LOC,Y,b
CP,1,UX,all
CP,2,UY,all
*GET,zuo,NODE,,NUM,MIN
nsel,S,LOC,X,a
nsel,U,LOC,Y,0
nsel,U,LOC,Y,b
CP,3,UX,all
CP,4,UY,all
*GET,you,NODE,,NUM,MIN
nsel,S,LOC,y,0
nsel,U,LOC,x,0
nsel,U,LOC,x,a
CP,5,UX,all
CP,6,UY,all
*GET,xia,NODE,,NUM,MIN
nsel,S,LOC,y,b
nsel,U,LOC,x,0
nsel,U,LOC,x,a
CP,7,UX,all
CP,8,UY,all
*GET,shang,NODE,,NUM,MIN
nsel,S,LOC,X,0
nsel,r,LOC,Y,b
*GET,zs,NODE,,NUM,MIN
nsel,S,LOC,X,a
nsel,r,LOC,Y,0
*GET,yx,NODE,,NUM,MIN
nsel,S,LOC,X,0
nsel,r,LOC,Y,0
*GET,zx,NODE,,NUM,MIN
nsel,S,LOC,X,a
nsel,r,LOC,Y,b
*GET,ys,NODE,,NUM,MIN
ALLSEL,
TUNIF,TEMP,
ALLSEL,
ALLSEL
NPLOT
FINISH
/SOL
SOLVE
FINISH
[ 本帖最后由 ma 于 2008-6-25 09:06 编辑 ] |