wusemm 发表于 2010-12-8 13:57

对边简支对边自由板的模态


MXPAND,8                     ! EXPAND FIRST MODE
MODOPT,REDUC,5,,,2             ! PRINT ALL REDUCED MODE SHAPES
MP,EX,1,2E11
MP,DENS,1,7.86E3
MP,NUXY,1,0.3
K,1,,0                         !Defines a keypoint,NPT, X, Y;
K,2,0.38,0
KGEN,2,1,2,1,,0.3            !产生额外的2个keypoint,DY=0.6
L,1,3                        !Defines line
L,2,4
LESIZE,ALL,,,8               ! 分割线段, NL1=all,ndiv=8;
A,1,2,4,3                      ! 分割线段的关键点走向,1,2点,4,3点直线
ESIZE,,8                     ! 定义默认线段划分数 NDIV=4
AMESH,1                        ! Generates nodes and area elements within areas
NSEL,S,LOC,Y,0.3               ! 选择一系列点,S 选择新的系列,Y =0.3
M,ALL,UZ                     ! Defines master degrees of freedom for reduced and superelement generation analyses.
/pnum,line,1                   !Controls entity numbering/coloring on plots.

LPLOT, All
dl,2,,uz                     !Defines DOF constraints on lines. DL, LINE, AREA, Lab, Value1, Value2
dl,2,,Rotx   

dl,1,,ux                     !Defines DOF constraints on lines. DL, LINE, AREA, Lab, Value1, Value2
dl,1,,Roty

UTPR,ALL,1
FINISH
*CREATE,SOLVIT,MAC             ! CREATE MACRO TO SOLVE AND RETRIEVE RESULTS
/SOLU   
SOLVE
*GET,FREQ,MODE,1,FREQ
*DIM,LABEL,CHAR,1,2
*DIM,VALUE,,1,3
LABEL(1,1) = '   f, '
LABEL(1,2) = 'Hz      '
*VFILL,VALUE(1,1),DATA,128.09
*VFILL,VALUE(1,2),DATA,FREQ
*VFILL,VALUE(1,3),DATA,ABS(FREQ/128.09)
FINISH
*END
SOLVIT                         ! EXECUTE MACRO TO SOLVE AND RETRIEVE RESULTS

我做了一个关于对边简支对边自由的板的模态分析
但是结果和别人做的有差异
请帮我看看哪里有问题,x=0,x=0.38简支,y=0,y=0.3自由






wusemm 发表于 2010-12-8 13:58

16443 发表于 2010-12-8 14:43

把你的结果和单元类型贴出来,再看问题

wusemm 发表于 2010-12-8 17:18




/PREP7
SMRT,OFF
/units,si
/TITLE, VM66, VIBRATION OF A FLAT PLATE
C***          VIBRATION PROBS. IN ENGR., TIMOSHENKO, 3RD. ED., PAGE 338, ART. 53
C***          USING SHELL63 ELEMENTS WITH SHELL OPTION
ANTYPE,MODAL                   ! MODE-FREQUENCY ANALYSIS
ET,1,SHELL63
R,1,0.002                      ! THICKNESS = 0.002
MXPAND,8                     ! EXPAND FIRST MODE
MODOPT,LANB,5,,,2             ! PRINT ALL REDUCED MODE SHAPES
MP,EX,1,2E11
MP,DENS,1,7.86E3
MP,NUXY,1,0.3
K,1,,0                         !Defines a keypoint,NPT, X, Y;
K,2,0.38,0
KGEN,2,1,2,1,,0.3            !产生额外的2个keypoint,DY=0.6
L,1,3                        !Defines line
L,2,4
LESIZE,ALL,,,8               ! 分割线段, NL1=all,ndiv=8;
A,1,2,4,3                      ! 分割线段的关键点走向,1,2点,4,3点直线
ESIZE,,8                     ! 定义默认线段划分数 NDIV=4
AMESH,1                        ! Generates nodes and area elements within areas
!NSEL,S,LOC,Y,0.15            ! 选择一系列点,S 选择新的系列,Y =0.3
!M,ALL,UZ                     ! Defines master degrees of freedom for reduced and superelement generation analyses.
/pnum,line,1                   !Controls entity numbering/coloring on plots.
LPLOT, All
dl,2,,uz                     !Defines DOF constraints on lines. DL, LINE, AREA, Lab, Value1, Value2(x=0.38)
dl,1,,ux                     !Defines DOF constraints on lines. DL, LINE, AREA, Lab, Value1, Value2(x=0)
dl,1,,uy
dl,1,,uz
dl,1,,Rotx
dl,1,,Rotz
BETAD,0.01
UTPR,ALL,1
FINISH
*CREATE,SOLVIT,MAC             ! CREATE MACRO TO SOLVE AND RETRIEVE RESULTS
/SOLU   
SOLVE
*GET,FREQ,MODE,1,FREQ
*DIM,LABEL,CHAR,1,2
*DIM,VALUE,,1,3
LABEL(1,1) = '   f, '
LABEL(1,2) = 'Hz      '
*VFILL,VALUE(1,1),DATA,128.09
*VFILL,VALUE(1,2),DATA,FREQ
*VFILL,VALUE(1,3),DATA,ABS(FREQ/128.09)
FINISH
*END
SOLVIT                         ! EXECUTE MACRO TO SOLVE AND RETRIEVE RESULTS
SAVE,TABLE_1





页: [1]
查看完整版本: 对边简支对边自由板的模态