求帮助——压电分析

zhudingkun1984

我想在一个0.2*0.2*0.785的PZT柱上加10000N的力，加载后提示
[img]file:///C:/Documents%20and%20Settings/Administrator/Application%20Data/Tencent/Users/114386338/QQ/WinTemp/RichOle/H)JUXUNJT%7D)%7DR]6[%7BNCW$@1.jpg[/img]
我选择其它节点都是这样，请问问题出在哪？求老师指点一下。下面是session editor：

/NOPR   ! Suppress printing of UNDO process
/PMACRO ! Echo following commands to log   
FINISH  ! Make sure we are at BEGIN level   
/CLEAR,NOSTART  ! Clear model since no SAVE found   
! WE SUGGEST YOU REMOVE THIS LINE AND THE FOLLOWING STARTUP LINES   
/input,menust,tmp,'',,,,,,,,,,,,,,,,1   
/GRA,POWER  
/GST,ON
/PLO,INFO,3
/GRO,CURL,ON
/CPLANE,1   
/REPLOT,RESIZE  
WPSTYLE,,,,,,,,0
/PREP7  
!*  
ET,1,SOLID5,9   
!*  
KEYOPT,1,1,3
KEYOPT,1,3,0
KEYOPT,1,5,0
!*  
ET,2,MESH200
!*  
KEYOPT,2,1,6
KEYOPT,2,2,0
!*  
!*  
TB,ANEL,1,1,21,0
TBTEMP,0
TBDATA,,1.32e11,7.1e10,7.3e10,,,
TBDATA,,1.32e11,7.3e10,,,,1.15e11   
TBDATA,,,,,3e10,,   
TBDATA,,2.6e10,,2.6e10,,,   
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,DENS,1,,7600
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,PERX,1,,7.124e-9
MPDATA,PERY,1,,7.124e-9
MPDATA,PERZ,1,,5.841e-9
TB,PIEZ,1,,,0   
TBMODIF,1,1,
TBMODIF,1,2,
TBMODIF,1,3,-4.1
TBMODIF,2,1,
TBMODIF,2,2,
TBMODIF,2,3,-4.1
TBMODIF,3,1,
TBMODIF,3,2,
TBMODIF,3,3,14.1
TBMODIF,4,1,
TBMODIF,4,2,
TBMODIF,4,3,
TBMODIF,5,1,
TBMODIF,5,2,10.5
TBMODIF,5,3,
TBMODIF,6,1,10.5
TBMODIF,6,2,
TBMODIF,6,3,
BLOCK,-0.1,0.1,-0.1,0.1,0,0.785,
TYPE,   2   
MAT,       1
REAL,   
ESYS,       0   
SECNUM,
!*  
LSEL,S,LOC,Z,0  
FLST,5,4,4,ORDE,2   
FITEM,5,1   
FITEM,5,-4  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1,0.01, , , , , , ,1   
!*  
MSHAPE,0,2D
MSHKEY,1
!*  
FLST,5,6,5,ORDE,2   
FITEM,5,1   
FITEM,5,-6  
CM,_Y,AREA  
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,'AREA'   
CMSEL,S,_Y  
!*  
AMESH,_Y1   
!*  
CMDELE,_Y   
CMDELE,_Y1  
CMDELE,_Y2  
!*  
LSEL,S,LOC,Z,0.785  
FLST,5,4,4,ORDE,2   
FITEM,5,5   
FITEM,5,-8  
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1,0.01, , , , , , ,1   
!*  
/VIEW,1,1,2,3   
/ANG,1  
/REP,FAST   
MSHKEY,0
!*  
FLST,5,6,5,ORDE,2   
FITEM,5,1   
FITEM,5,-6  
CM,_Y,AREA  
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,'AREA'   
CMSEL,S,_Y  
!*  
!*  
ACLEAR,_Y1  
AMESH,_Y1   
!*  
CMDELE,_Y   
CMDELE,_Y1  
CMDELE,_Y2  
!*  
FINISH  
/SOL
!*  
ANTYPE,0
/RGB,INDEX,100,100,100, 0   
/RGB,INDEX, 80, 80, 80,13   
/RGB,INDEX, 60, 60, 60,14   
/RGB,INDEX, 0, 0, 0,15  
/REPLOT
/VIEW,1,,,1
/ANG,1  
/REP,FAST   
/VIEW,1,1,2,3   
/ANG,1  
/REP,FAST   
/VIEW,1,,,-1
/ANG,1  
/REP,FAST   
/VIEW,1,,1  
/ANG,1  
/REP,FAST   
/VIEW,1,1   
/ANG,1  
/REP,FAST   
/REPLOT,RESIZE  
NSEL,S,LOC,Z,0  
FLST,2,441,1,ORDE,2
FITEM,2,1   
FITEM,2,-441
!*  
/GO
D,P51X, , , , , ,UZ, , , , ,
FINISH  
/PREP7  
FLST,4,441,1,ORDE,2
FITEM,4,1   
FITEM,4,-441
CP,1,VOLT,P51X  
FINISH  
/SOL
FLST,2,441,1,ORDE,2
FITEM,2,1   
FITEM,2,-441
/GO
!*  
D,P51X,VOLT,0   
NSEL,S,LOC,Z,0.785  
FLST,2,441,1,ORDE,2
FITEM,2,442
FITEM,2,-882
!*  
/GO
D,P51X, , , , , ,UZ, , , , ,
FINISH  
/PREP7  
FLST,4,441,1,ORDE,2
FITEM,4,442
FITEM,4,-882
CP,2,VOLT,P51X  
FINISH  
/SOL
FLST,2,441,1,ORDE,2
FITEM,2,442
FITEM,2,-882
/GO
!*  
D,P51X,VOLT,0   
/DIST,1,0.924021086472,1
/REP,FAST   
/DIST,1,0.924021086472,1
/REP,FAST   
/DIST,1,1.08222638492,1
/REP,FAST   
/DIST,1,0.924021086472,1
/REP,FAST   
/DIST,1,0.924021086472,1
/REP,FAST   
/DIST,1,1.08222638492,1
/REP,FAST   
/DIST,1,1.08222638492,1
/REP,FAST   
ASEL,S,LOC,Y,0.1
FLST,2,1,5,ORDE,1   
FITEM,2,4   
/GO
NSEL,S,LOC,Y,0.1
FLST,2,273,1,ORDE,8
FITEM,2,1   
FITEM,2,22  
FITEM,2,-41
FITEM,2,463
FITEM,2,483
FITEM,2,-502
FITEM,2,1114
FITEM,2,-1344   
/GO
!*  
SF,P51X,PRES,10000  
NSEL,S,LOC,Z,0.785  
FLST,2,441,1,ORDE,2
FITEM,2,442
FITEM,2,-882
/GO
!*  
SF,P51X,PRES,10000  
/VIEW,1,1,2,3   
/ANG,1  
/REP,FAST   
/VIEW,1,,,1
/ANG,1  
/REP,FAST   
/VIEW,1,1,2,3   
/ANG,1  
/REP,FAST   
/VIEW,1,1   
/ANG,1  
/REP,FAST   
/VIEW,1,1   
/ANG,1  
/REP,FAST   
/VIEW,1,,1  
/ANG,1  
/REP,FAST   
/VIEW,1,,,-1
/ANG,1  
/REP,FAST   
/VIEW,1,1   
/ANG,1  
/REP,FAST   
/VIEW,1,1   
/ANG,1  
/REP,FAST   
/VIEW,1,,,1
/ANG,1  
/REP,FAST   
FLST,2,441,1,ORDE,2
FITEM,2,442
FITEM,2,-882
/GO
!*  
SF,P51X,PRES,10000  
FINISH  
/PREP7  
!*  
ETDEL,2
!*  
FINISH  
/SOL
FLST,2,441,1,ORDE,2
FITEM,2,442
FITEM,2,-882
/GO
!*  
SF,P51X,PRES,10000  
ALLSEL,ALL  
FLST,2,1762,1,ORDE,2
FITEM,2,1   
FITEM,2,-1762   
/GO
!*  
SF,P51X,PRES,10000  
)/GOP    ! Resume printing after UNDO process   
)! We suggest a save at this point