怎样用ansys求结构的传递率？

非常老妖怪

怎样用ansys求结构的传递率？这是一个很有用的方面...请教高手具体操作怎么弄啊？

犟牛

是要求传递函数吧，该你一个例子吧

1. ！固定端施加加速度为1m/s^2: 用大质量和一个大集中力实现
   
2. ！用20*Log|u_out/u_in| 求得曲线。
   
3. FINISH
   
4. /CLEAR
   
5. /PREP7  !进入前处理模块PREP7
   
6. LENGTH = 46
   
7. NUMB = 100
   
8. ET, 1, BEAM3 !定义第一类单元为平面梁单元BEAM3
   
9. R, 1, 0.12, 9e-4, 0.3  !定义单元的第一类实常数:Area,Inertia,Height
   
10. MP, EX, 1, 207e9    !定义第一类材料的弹性模量EX
    
11. MP,PRXY,1,0.3
    
12. MP, DENS,1,7800
    
13. *DO,I,1,NUMB
    
14. XN=(I-1)*LENGTH/NUMB
    
15. N, I, XN, 0  !定义各个结点
    
16. *ENDDO
    
17. TYPE, 1 !使用第一类单元
    
18. REAL, 1 !使用第一类实常数
    
19. MAT, 1  !使用第一类材料
    
20. *DO,I,1,NUMB-1
    
21. E,I,I+1 !按上面设置定义单元
    
22. *ENDDO
    
23. FINISH      !退出后模块
    
24. 
    
25. /SOLU   !进入求解模块SOLUTION
    
26. ANTYPE,3
    
27. D,1, , , , , ,UX,ROTZ, , , ,
    
28. DMPRAT,0.01,
    
29. df=0.01
    
30. nf=299
    
31. f0=0.01
    
32. *do,i,1,nf,1
    
33. f1=f0+(i-1)*df
    
34. f2=i*df
    
35. omega=2*3.1415926*f1
    
36. uxa=1/omega/omega
    
37. harfrq,f1,f2
    
38. kbc,0
    
39. nsubst,1
    
40. D,1,uy,uxa
    
41. ALLSEL
    
42. solv
    
43. *enddo
    
44. fini
    
45. 
    
46. /post26
    
47. nsol,2,100,u,y,uout
    
48. nsol,3,1,u,y,uin
    
49. ! 计算传递函数
    
50. NUMVAR,200  
    
51. PLCPLX,0
    
52. PRCPLX,1
    
53. FILLDATA,191,,,,1,1
    
54. REALVAR,191,191
    
55. FILLDATA,192,,,,0,0
    
56. FILLDATA,193,,,,1,0
    
57. FILLDATA,194,,,,-1,0
    
58. FILLDATA,195,,,,1,1
    
59. VARNAME,195,NSET
    
60. !   
    
61. ! Name: udB
    
62. ! ID:  4
    
63. ! Function: 20*log(abs({uout}/{uin}))   
    
64. QUOT,200,2,3
    
65. ABS,199,200
    
66. CLOG,200,199
    
67. FILLDATA,198,,,,20,0
    
68. REALVAR,198,198
    
69. PROD,4,198,200,,udB
    
70. !   
    
71. STORE,MERGE
    
72. XVAR,1  
    
73. PLVAR,4,
    
74. fini

复制代码

dujunmin

用ansys求解传递率的最好方法就是谐响应分析。