混凝土开裂命令流实例

VibInfo

1. 
   
2. finish
   
3. /clear
   
4. /title, fixed - fixed concrete beam example
   
5. /prep7
   
6. et,1,65
   
7. mp,ex,1,3e7 ! steel rebar (units are pounds, inches)
   
8. mp,ex,2,1e6, ! concrete
   
9. mp,dens,2,.00025
   
10. tb,concr,2
    
11. tbdata,1,.3,.5,200,4000 ! shear coeffs, tensile and compress strength
    
12. 
    
13. r,1,1,.03,0,0 ! mat 1 (steel), 3 percent reinforcement in x dir
    
14. r,2,1,.01,0,0 ! mat 1 (steel), 1 percent
    
15. r,3,1,.04,0,0 ! mat 1 (steel), 4 percent
    
16. 
    
17. block,,100,,5,,5
    
18. block,,100,5,10,,5
    
19. block,,100,10,15,,5
    
20. !vovlap,all
    
21. NUMMRG,KP, , , ,LOW
    
22. numcmp,volu
    
23. esize,5
    
24. mat,2 ! concrete material
    
25. real,1 ! rebar
    
26. vmesh,1
    
27. real,2
    
28. vmesh,2
    
29. real,3
    
30. vmesh,3
    
31. 
    
32. nsel,s,loc,x
    
33. d,all,all
    
34. nsel,s,loc,x,100
    
35. d,all,all
    
36. nsel,all
    
37. fini
    
38. 
    
39. /solu
    
40. nsel,s,loc,y,15
    
41. sf,all,pres,100
    
42. nsel,all
    
43. OUTRES,ALL,ALL,
    
44. nsub,10
    
45. solve
    
46. fini
    
47. 
    
48. /post1
    
49. /DEVICE,VECTOR,1
    
50. set,last
    
51. plcrack
    
52. fini

复制代码