马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
提示错误:
*** WARNING *** CP = 12.438 TIME= 15:48:02
Repeated Lanczos shift and factorize steps did not yield additional
eigenvalues in the requested frequency range. Either the eigenvalues
are widely separated or, there are only 0 eigenvalues in the frequency
range specified (FREQB and FREQE in MODOPT command).
*** WARNING *** CP = 12.438 TIME= 15:48:02
There are no modes in the specified range.
命令流:
/COM, Structural
!*
*SET,ROYXG,30
*SET,TYXG,3.5
*SET,RIYXG,ROYXG-TYXG
*SET,AYXG,3.1415926*(ROYXG**2-RIYXG**2)
*SET,ROLXG,24
*SET,TLXG,3.5
*SET,RILXG,ROLXG-TLXG
*SET,ALXG,3.1415926*(ROLXG**2-RILXG**2)
*SET,ROFG,24
*SET,TFG,3.5
*SET,RIFG,ROFG-TFG
*SET,AFG,3.1415926*(ROFG**2-RIFG**2)
/PREP7
!*
ET,1,BEAM188
!*
ET,2,LINK8
!*
R,1,AYXG, ,
R,2,ALXG, ,
R,3,AFG, ,
!*
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,206E3
MPDATA,PRXY,1,,0.3
TB,BKIN,1,1,2,1
TBTEMP,0
TBDATA,,235,6180,,,,
SECTYPE, 1, BEAM, CTUBE, YXG, 0
SECOFFSET, CENT
SECDATA,RIYXG,ROYXG,36,0,0,0,0,0,0,0
SECTYPE, 2, BEAM, CTUBE, LXG, 0
SECOFFSET, CENT
SECDATA,RILXG,ROLXG,36,0,0,0,0,0,0,0
SECTYPE, 3, BEAM, CTUBE, FG, 0
SECOFFSET, CENT
SECDATA,RIFG,ROFG,36,0,0,0,0,0,0,0
*do,i,1,12,1
n,i,i*3000-3000,354,0
*enddo
*do,i,13,24,1
n,i,i*3000-39000,-354,0
*enddo
*do,i,25,35,1
n,i,i*3000-73500,0,6000
*enddo
n,2000,16500,0,3000
TYPE, 1
MAT, 1
REAL, 2
SECNUM, 2
*DO,I,1,11,1
e,I,I+1,2000
*ENDDO
*DO,I,13,23,1
e,I,I+1,2000
*ENDDO
TYPE, 1
MAT, 1
REAL, 1
SECNUM, 1
*DO,I,25,34,1
e,I,I+1,2000
*ENDDO
TYPE, 2
MAT, 1
REAL, 3
SECNUM, 3
*DO,I,1,12,1
E,I,I+12,2000
*ENDDO
*DO,I,25,35,1
E,I,I-24,2000
E,I,I-23,2000
E,I,I-12,2000
E,I,I-11,2000
*ENDDO
FINISH
/SOLU
FLST,2,2,1,ORDE,2
FITEM,2,1
FITEM,2,13
!*
/GO
D,P51X, ,0, , , ,UX,UY,UZ, , ,
FLST,2,2,1,ORDE,2
FITEM,2,25
FITEM,2,35
!*
/GO
D,P51X, ,0, , , ,UY, , , , ,
FLST,2,2,1,ORDE,2
FITEM,2,12
FITEM,2,24
!*
/GO
D,P51X, ,0, , , ,UY,UZ, , , ,
FLST,2,1,1,ORDE,1
FITEM,2,25
!*
/GO
F,P51X,FX,1000
FLST,2,1,1,ORDE,1
FITEM,2,35
!*
/GO
F,P51X,FX,-1000
FLST,2,2,1,ORDE,2
FITEM,2,1
FITEM,2,13
!*
/GO
F,P51X,FX,-500
FLST,2,2,1,ORDE,2
FITEM,2,12
FITEM,2,24
!*
/GO
F,P51X,FX,500
SAVE
!*
ANTYPE,0
NSUBST,50,0,0
OUTRES,ERASE
OUTRES,ALL,ALL
AUTOTS,1
LNSRCH,1
NEQIT,13
PRED,ON,,ON
PSTRES,1
SOLVE
FINISH
/SOLU
!*
ANTYPE,1
!*
!*
BUCOPT,LANB,9,0,0
!*
MXPAND,9,0,0,0,0.001,
SOLVE
FINISH
/POST1
SET,LIST
SET,FIRST
PLDISP,1
FINISH
谢谢! |