声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1481|回复: 3

[综合讨论] 对边简支对边自由板的模态

[复制链接]
发表于 2010-12-8 13:57 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x

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自由

理论结果.gif




回复
分享到:

使用道具 举报

 楼主| 发表于 2010-12-8 13:58 | 显示全部楼层
模型参数.gif
发表于 2010-12-8 14:43 | 显示全部楼层
把你的结果和单元类型贴出来,再看问题
 楼主| 发表于 2010-12-8 17:18 | 显示全部楼层
elements.gif

my results.gif
/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





您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-11-26 12:52 , Processed in 0.109021 second(s), 21 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表