! TITLE: hyfly_thermal.parm (HYFLY) ! !--------------------------------------------------------------------------- ! Rev - 03/14/2002 J. Rinaldi !--------------------------------------------------------------------------- ! ! This macro creates the parameter file for the actuator envelope of the ! hyfly missile. ! !---------------------- a.) Title and Units Declaration -------------------- ! /title,Hyfly Thermal Analysis ! /units,bin ! !--------------------- b.) Part Name Selection Variable -------------------- ! name='hyfly' arry_nam='hyf' ! !--------------------------- c.) Model C.S. Names -------------------------- ! ct_name='CShyfly0' ! cartesian cyl_name='CShyfly1' ! cylindrical sph_name='CShyfly2' ! spherical ! !----------------------- d.) Material and Element Type --------------------- ! scalgeom=1 !.0254 ! Comvert to meters for length dim's ! et,1,plane55,,,1 !et,2,solid95 ! ! Convection coefficient at mach 6, 70 deg F and 1 atm air pressure h_air=1.88 ! [BTU/(hr-in^2-F)] *if,scalgeom,eq,1,then /units,bin mat_select,'ti4900','sand' *else ! Assume MKS system of units /units,si create_mat_prop,'ti4900','kxx',222.2,'c',628.0,'dens',4511.7 create_mat_prop,'sand','kxx',0.5192,'c',1172.3,'dens',1494.7 h_air=h_air*817 ! W/(m^2-C) *endif ! !--------------------------- e.) Model Parameters -------------------------- ! r01=3.560 z01=1.810 z02=29.635 del_z=(z02-z01)/10 ! Dr01=19.300/2 Dz01=16.635 ! Dr02=Dr01-r01 Dz02=Dz01 ! Dr03=Dr02 ! 1st point on actuator spline Dz03=Dz01-z01 ! Dr04=6.614 ! 2nd point on actuator spline Dz04=Dz01-z01-del_z ! Dr05=7.123 ! 3rd point on actuator spline Dz05=Dz01-z01-2*del_z ! Dr06=7.603 ! 4th point on actuator spline Dz06=Dz01-z01-3*del_z ! Dr07=8.043 ! 5th point on actuator spline Dz07=Dz01-z01-4*del_z ! Dr08=8.428 ! 6th point on actuator spline Dz08=Dz01-z01-5*del_z ! Dr09=8.751 ! 7th point on actuator spline Dz09=Dz01-z01-6*del_z ! Dr10=9.021 ! 8th point on actuator spline Dz10=Dz01-z01-7*del_z ! Dr11=9.265 ! 9th point on actuator spline Dz11=Dz01-z01-8*del_z ! Dr12=9.458 ! 10th point on actuator spline Dz12=Dz01-z01-9*del_z ! Dr13=9.650 ! 11th point on actuator spline Dz13=Dz01-z01-10*del_z ! ! ! skn_thk=0.100 ! Dr14=Dr01-r01-skn_thk Dz14=Dz01 ! Dr15=Dr14 ! 1st point on skin spline Dz15=Dz01-z01 ! Dr16=6.512 ! 2nd point on skin spline Dz16=Dz01-z01-del_z ! Dr17=7.021 ! 3rd point on skin spline Dz17=Dz01-z01-2*del_z ! Dr18=7.502 ! 4th point on skin spline Dz18=Dz01-z01-3*del_z ! Dr19=7.942 ! 5th point on skin spline Dz19=Dz01-z01-4*del_z ! Dr20=8.327 ! 6th point on skin spline Dz20=Dz01-z01-5*del_z ! Dr21=8.650 ! 7th point on skin spline Dz21=Dz01-z01-6*del_z ! Dr22=8.921 ! 8th point on skin spline Dz22=Dz01-z01-7*del_z ! Dr23=9.172 ! 9th point on skin spline Dz23=Dz01-z01-8*del_z ! Dr24=9.357 ! 10th point on skin spline Dz24=Dz01-z01-9*del_z ! Dr25=9.559 ! 11th point on skin spline Dz25=Dz01-z01-10*del_z ! ! ! Dr27=10.457/2 ! 1st point on skin spline Dz27=Dz01-z01 ! Dr28=5.825 ! 2nd point on skin spline Dz28=Dz01-z01-del_z ! Dr29=6.402 ! 3rd point on skin spline Dz29=Dz01-z01-2*del_z ! Dr30=6.945 ! 4th point on skin spline Dz30=Dz01-z01-3*del_z ! Dr31=7.436 ! 5th point on skin spline Dz31=Dz01-z01-4*del_z ! Dr32=7.859 ! 6th point on skin spline Dz32=Dz01-z01-5*del_z ! Dr33=8.200 ! 7th point on skin spline Dz33=Dz01-z01-6*del_z ! Dr34=8.466 ! 8th point on skin spline Dz34=Dz01-z01-7*del_z ! Dr35=8.675 ! 9th point on skin spline Dz35=Dz01-z01-8*del_z ! Dr36=8.847 ! 10th point on skin spline Dz36=Dz01-z01-9*del_z ! Dr37=18.000/2 ! 11th point on skin spline Dz37=Dz01-z01-10*del_z ! ! !------------------------ f.) Model C.S. Coordinates ----------------------- ! acs=0 ! active coordinate system ! xc=0 ! x coordinate center yc=0 ! y coordinate center zc=0 ! z coordinate center ! rotxyc=-90 ! xy rotation rotyzc=0 ! yz rotation rotzxc=-90 ! zx rotation ! !--------------------------------------------------------------------------- ! !--------------------- g.) Thermal conditions -------------------------------- ! Tinit=70 ! [deg F] Temp just before launch Tnoz=4000 ! [deg F] Nozzle temp Tskin=817.3 ! [deg F] Outer skin temp *if,scalgeom,ne,1,then Tinit=(Tinit-32)/1.8 ! [deg C] Temp just before launch Tnoz=(Tnoz-32)/1.8 ! [deg C] Nozzle temp Tskin=(Tskin-32)/1.8 ! [deg C] Outer skin temp *endif