A.7.2 E-Mail from Professor Kim About Out-Of-Plane Shear

A.7.1 – Mass per floor e-mail from Randy. The mass changed some time Sunday afternoon, but obviously I didn’t have time to make the changes and rerun the trade studies.

Date / Sat, 1 Dec 2001 22:17:34 -0500 (EST)
To /
From / Randy Andersen <>
Reply-To /
Subject / Re: [aae450] meeting
Parts / (source)
Garage: 12644 kg
Hemisphere 13298
Kitchen 4277
Sleeping 1747
Ejection 3113
External 525 (below)
Randy

A.7.2 – E-mail from Professor Kim about out-of-plane shear

Date / Mon, 12 Nov 2001 09:09:18 -0500
To / "michael.j.mc.kenzie.1" <>
From / Hyonny Kim <>
Subject / Re: Carpet plots.
Parts / (source)
Hello Mike,
The max Sxy is in-plane shear strength limit. The other two, Sxz and Syz,
are out-of-plane, or interlaminar shears. These you can not find from the
Carpet Plots. They are difficult to find in general. A typical range of
these strength numbers is 10-14 ksi.
Hyonny Kim

A.7.3 – Propulsions engineer e-mail about g loads

Date / Wed, 10 Oct 2001 22:16:43 -0400
To /
From / Jon Edwards <>
Subject / Launch Loads
Parts / (source)
Mike~
I redid my launch load calculations and I calculated that the Russian
Energia (what the Spring's launch vehicle was based on) would have had a max
g-load of 4.18 g's. The Saturn V had a max g-load of 3.88 g's and the Space
Shuttle has a max g-load of 3.14 g's. However I did another calculation for
the space shuttle after it has jetisoned the SRB's and the max g-load I
calculated is about 5.4 g's. I'm still working on the parachute loads...
Jon

A.7.4 – Ansys script. See electronic copy (structure.log). You don’t want to see it here, it is about 6 pages long.

A.7.5 – buckling macro, also included electronically as buckle.mac

FINISH

/SOLU

!*

ANTYPE,1

EXPASS,0

!*

BUCOPT,LANB,1,0

!*

/STATUS,SOLU

SOLVE

A.7.6 – Matlab code used for EI trade study. Also included electronically as mesh.m

clc;clear all;clf;

E1=65.5e9;

E2=.870e9;

t=[.001 .002 .003];

d=.01:.001:.06;

[rowsd colsd]=size(d);

for i=1:3

for j=1:colsd

I1(i,j)=8*t(1,i).*(d(1,j).^2);

end

end

for i=1:3

for j=1:colsd

I2(i,j)=1/12*(d(1,j).^3);

end

end

EItot=E1*I1+E2*I2;

text(.04,2.5e6,'t_p_l_a_t_e=2mm')

text(.048,1e6,'t_p_l_a_t_e=1mm')

weight1=2*1600*.001+d*128;

weight2=2*1600*.002+d*128;

weight3=2*1600*.003+d*128;

weight=[weight1;weight2;weight3];

plotyy(d,EItot,d,weight)

grid

xlabel('Distance between plates, d [m]')

ylabel('EI_t_o_t_a_l')

axis([.01 .06 0 6e6])

A-7-2