! TITLE: mat_list.mac (MANAGEMENT) ! ! ! OBJECTIVE: ! ! This macro is a listing of all materials, and their properties. ! ! ! DESCRIPTION: ! ! The materials are listed by their name in the IF-THEN structure, and ! their material properties are specified within these structures. This ! macro is called by 'mat_library.mac'. ! ! NAMES MUST BE EIGHT (8) CHARACTER OR LESS ! ! TABLE OF CONTENTS OF MATERIALS & PARAMETER NAMES ! ________________________________________________ ! ! Metallic: ! ! 1. AL 6061-T6 .................................... al6061 ! 2. AL 6061-T0 .................................... al6061a ! 3. A356.0-T6 AL, AMS-A-21180 ..................... ala356 ! 4. 17-4PH CRES, Cond H1025, AMS 5643 ............. c17_4 ! 5. 304 CRES, Cond A, ASTM A276 ................... c304a ! 6. CRES 440C ..................................... c440c ! 7. 416 CRES, Cond H, ASTM A582 ................... c416 ! 8. 416 CRES, Cond A, ASTM A582 ................... c416a ! 9. 416 CRES, Cond T, ASTM A582 ................... c416b ! 10. Tungsten Alloy, AMS-T-21014 .................. tungsten ! 11. INCONEL 718 , AMS 5662,5663 .................. inc718 ! 12. 15-5PH CRES, Cond H1025, AMS 5862 ............ c15_5 ! 13. 410 CRES ..................................... c410 ! 14. 410 CRES, Cast ............................... c410c ! 15. Titanium (Pure), AMS 4900 .................... ti4900 ! 16. 316L CRES .................................... c316L ! 17. A286 CRES, AMS 5736 .......................... a286 ! 18. AL 7075-T73 .................................. al7075a ! 19. 17-7PH CRES .................................. c17_7 ! 20. PH13-8Mo ..................................... ph13_8 ! 21. Vascomax T-200 ............................... vascomax ! 22. Titanium Ti-6Al-6V-2Sn, MIL-T-9047, AMS 6935.. ti6_6_2 ! ! ! Non-Metallic (General): ! ! 1. Sand .......................................... sand ! 2. Air ........................................... air ! ! Insulators (Thermal/Electrical): ! ! 1. Epon 828 epoxy ................................ epon828 ! 2. Ceramic Tile Insulation, AETB-8 ............... aetb_8 ! ! Units: ! ! Modulus of Elasticity: EX psi ! Density: DENS lbf-s^2/in^4 ! Poisson's ratio: NUXY ! Coefficient of Thermal Exansion: ALPX 1/degF ! Conduction Coefficient: KXX Btu/(hr-in-degF) ! Specific Heat: C Btu-in/(lbf-s^2-degF) ! ! Convection coefficient: (used with SF command) Btu/(hr-in^2-degF) ! ! *get,prkey_,active,0,prkey /nopr ! constants ! ! !________________________________ METALLIC _______________________________ ! ! ! *if,mat_,eq,'al6061',then EX=9.9e6 DENS=.098/g_bin NUXY=0.33 ALPX=12.25e-6 ! at -40 deg *endif ! ! *if,mat_,eq,'al6061a',then EX=9.9e6 DENS=.098/g_bin NUXY=0.33 ALPX=12.25e-6 ! at -40 deg *endif ! ! *if,mat_,eq,'ala356',then EX=10.4E6 DENS=.097/g_bin NUXY=0.33 ALPX=11.1E-6 ! at -40 deg *endif ! ! ! Ref 1 ! *if,mat_,eq,'c17_4',then EX=28.5e6 DENS=.283/g_bin NUXY=0.27 ALPX=6.15e-6 ! at -40 deg *endif ! ! *if,mat_,eq,'c304a',then EX=28.0e6 DENS=.285/g_bin NUXY=0.27 ALPX=9.6e-6 ! at -40 deg *endif ! ! *if,mat_,eq,'c440c',then EX=28.0E6 DENS=.283/g_bin NUXY=0.27 ALPX=5.56e-6 ! at -40 deg *endif ! ! ! Ref 2 ! *if,mat_,eq,'c416',then EX=28.5E6 DENS=.283/g_bin NUXY=0.27 ALPX=5.23e-6 ! at -40 deg *endif ! ! *if,mat_,eq,'c416a',then EX=28.5E6 DENS=.283/g_bin NUXY=0.27 ALPX=5.23e-6 ! at -40 deg *endif ! ! *if,mat_,eq,'c416b',then EX=28.0E6 DENS=.283/g_bin NUXY=0.27 ALPX=5.23e-6 ! at -40 deg *endif ! ! *if,mat_,eq,'tungsten',then EX=50.0e6 DENS=.607/g_bin NUXY=0.27 ALPX=2.4e-6 ! at -40 deg *endif ! ! *if,mat_,eq,'inc718',then EX=29.4E6 DENS=0.286/g_bin NUXY=0.29 ALPX=7.0e-6 *endif ! ! *if,mat_,eq,'c15_5',then EX=28.5E6 DENS=0.283/g_bin NUXY=0.27 ALPX=6.25e-6 *endif ! ! *if,mat_,eq,'c410',then EX=28.5E6 DENS=0.283/g_bin NUXY=0.27 ALPX=5.28e-6 *endif ! ! *if,mat_,eq,'c410c',then EX=28.5E6 DENS=0.280/g_bin NUXY=0.27 ALPX=5.28e-6 *endif ! ! *if,mat_,eq,'ti4900',then EX=15.5E6 DENS=0.163/g_bin NUXY=0.34 ALPX=5.28e-6 KXX=10.7 C=0.15*g_bin *endif ! ! *if,mat_,eq,'c316L',then EX=29.0e6 DENS=0.286/g_bin NUXY=0.27 ALPX=9.6e-6 ! at -40 deg *endif ! ! *if,mat_,eq,'a286',then EX=29.1e6 DENS=0.287/g_bin NUXY=0.31 ALPX=9.0e-6 ! at -40 deg *endif ! ! *if,mat_,eq,'al7075a',then EX=9.37e6 DENS=0.101/g_bin NUXY=0.33 ALPX=12.8e-6 ! at 275 deg F *endif ! ! ! ! ! Ref 1 ! *if,mat_,eq,'c17_7',then EX=29.0e6 DENS=.276/g_bin NUXY=0.28 ALPX=14.7e-6 ! at -40 deg *endif ! ! ! ! Ref 1 ! *if,mat_,eq,'ph13_8',then EX=28.3e6 DENS=.279/g_bin NUXY=0.28 ALPX=5.7e-6 ! at 70 deg *endif ! ! ! ! Ref 1 ! *if,mat_,eq,'vascomax',then EX=27.2e6 DENS=.288/g_bin NUXY=0.29 ALPX=7.1e-6 ! at 70 deg *endif ! ! ! Fty = 155 ksi, Ftu = 170 ksi (Over 1.000 to 2.000) ! *if,mat_,eq,'ti6_6_2',then EX=16.0E6 DENS=0.164/g_bin NUXY=0.31 ALPX=5.0e-6 KXX=10.7 ! Pure property (needs update) C=0.15*g_bin ! Pure property (needs update) *endif ! ! !__________________________ NON-METALLIC / GENERAL ________________________ ! ! ! *if,mat_,eq,'sand',then KXX=0.025 DENS=0.054/g_bin C=0.28*g_bin *endif ! ! !_____________________ INSULATORS / THERMAL,ELECTRICAL ____________________ ! ! ! *if,mat_,eq,'epon828',then EX=1.62E6 DENS=.066/g_bin NUXY=0.4 ALPX=15.0e-6 ! at -40 deg *endif ! ! *if,mat_,eq,'aetb_8',then DENS=4.919e-3 KXX=0.0642 C=0.275*g_bin ALPX=1.77e-6 *endif ! ! *if,prkey_,eq,1,then /go *endif