请高手帮我看下一个做折弯分析的ansys命令流

wangmei0821

在ansys中做了一个折弯分析前处理，发现接触地方还是不对，前些天在论坛上求助一直没有人来解答，今天再次发帖求助，这次贴出来命令流，希望高手指点下，非常感谢

1. finis
   
2. /clea
   
3. /prep7
   
4. ET,1,SHELL163
   
5. *SET,_RC_SET,1,
   
6. R,1
   
7. RMODIF,1,1,5/6,3,0.2,0.2,0.2,0.2,
   
8. MP,DENS,1,2700
   
9. MP,EX,1,65e9
   
10. MP,NUXY,1,0.34
    
11. TB,PLAW,1,,,1,
    
12. TBDAT,1,40e6
    
13. TBDAT,2,24e9
    
14. TBDAT,3,
    
15. TBDAT,4,
    
16. TBDAT,5,
    
17. TBDAT,6,
    
18. TBDAT,7,
    
19. EDMP,RIGI,2,7,7
    
20. MP,DENS,2,7830
    
21. MP,EX,2,207e9
    
22. MP,NUXY,2,0.34
    
23. EDSHELL,20,-1,1,2,1,1
    
24. RECTNG,-15,10,,2.5,
    
25. CYL4, ,4.5,2
    
26. wprota,,,90
    
27. asbw,all
    
28. wpoff,,4.5
    
29. wprota,,90
    
30. asbw,all
    
31. WPCSYS,-1,0
    
32. !mesh
    
33. lesize,14,,,30
    
34. lesize,11,,,20
    
35. lesize,4,,,5
    
36. type,1
    
37. mat,1
    
38. real,1
    
39. MSHAPE,0,2D
    
40. MSHKEY,1
    
41. asel,s,,,5,6
    
42. amesh,all
    
43. allsel
    
44. lsel,s,,,1,3,2
    
45. lsel,a,,,15,16
    
46. lesize,all,,,8
    
47. lsel,s,,,5,8
    
48. lesize,all,,,10
    
49. type,1
    
50. mat,2
    
51. real,1
    
52. MSHKEY,0
    
53. asel,s,,,1,2
    
54. asel,a,,,7,8
    
55. amesh,all
    
56. !load
    
57. nsel,s,loc,x,10
    
58. D,all, ,0, , , ,UX,UY,UZ,ROTX,ROTY,ROTZ
    
59. ESEL,S,MAT,,2
    
60. nsle,s
    
61. D,all, ,0, , , ,UX,UY,UZ,ROTX,ROTY,ROTZ
    
62. ESEL,S,MAT,,1
    
63. nsle,s
    
64. nsel,r,loc,x,0,0.5
    
65. D,all, ,0, , , ,UX,UY,UZ,ROTX,ROTY,ROTZ
    
66. *DIM,time,ARRAY,2,1,1, , ,
    
67. *DIM,force,ARRAY,2,1,1, , ,
    
68. *SET,TIME(2,1,1) , 0.1
    
69. *SET,FORCE(2,1,1) , 5000
    
70. nsel,s,loc,x,-15
    
71. cm,n1,node
    
72. EDLOAD,ADD,VY,0,N1,TIME,FORCE, 0, , , , ,
    
73. allsel
    
74. EDPART,CREATE
    
75. EDCGEN,ANTS, 1, 2,0.1,0.1,0,0,0, , , , ,0,10000000,0,0
    
76. EDCONTACT,0.1,0,2,2,1,2,1,4,0
    
77. EDSP,OFF,' ',' ',1,
    
78. FINISH
    
79. /SOL
    
80. TIME,0.05,
    
81. EDRST,100,
    
82. EDHTIME,100,
    
83. EDDUMP,1,
    
84. !*
    
85. !*
    
86. !*
    
87. EDOUT,GLSTAT
    
88. EDOUT,MATSUM
    
89. EDOUT,SWFORC
    
90. !*
    
91. EDWRITE,LSDYNA,'bend','k',' '
    

复制代码

wangmei0821

好的，我把K文件传来，你帮我看下啊，谢谢啦

wangmei0821

下面是这个问题的K文件，我是在ansys中做的前处理，然后在ansys中生成的K文件，我对K文件不太懂