The Museum of HP Calculators

# Section Properties for Composite Body Cross-Sections for the HP-35s

This program is by Eric Lundgren and is used here by permission.

This program is supplied without representation or warranty of any kind. Eric Lundgren and The Museum of HP Calculators therefore assume no responsibility and shall have no liability, consequential or otherwise, of any kind arising from the use of this program material or any part thereof.

## Overview

This program computes the Ixx area moment of inertia and Xbar horizontal neutral axis for a composite body that is discretized with rectangles. There is no limit to the number of rectangles, as such you can approximate curvilinear edges with an appropriate number of rectangles.

You can also get the Iyy and Ybar by re-running it for the same body, while referencing left or right side as the base (ie, turn an I-beam on its side and enter the dimensions).

Slight modifications will also permit the extraction of final area.

## Listing

```LBL I
SF 10
EQN IXX and Neutral Axis
CF 10
CLVARS
INPUT N
INPUT B
INPUT H
RCL H
2
÷
RCL +T
RCL B
RCL × H
×
RCL +Q
STO Q
RCL B
RCL H
×
RCL +R
STO R
1
RCL +V
STO V
RCL Q
RCL ÷ R
RCL - C
X2
RCL ×A
RCL + I
STO I
RCL T
RCL H
2
÷
+
RCL Q
RCL ÷ R
-
X2
RCL ×B
RCL ×H
RCL H
3
YX
RCL ×B

12
÷
+
RCL + I
STO I
RCL Q
RCL ÷ R
STO C
RCL B
RCL × H
RCL + A
STO A
RCL T
RCL +H
STO T
RCL V
RCL N
X>Y?
GTO I007

I= **This is the value of composite Ix for
C= **This is the location of Xbar, ie the X
neutral axis**

RTN

LN=220
CK=704D```

Here is an example for an I-beam:

```XEQ I ENTER

screen will read: IXX AND NA (hit R/S to continue)

N=3 **number of sections**

R/S

B=5 **width of bottom flange**

R/S

H=0.25 **height of bottom flange**

R/S

B=0.5 **width of web**

R/S

H=8 **height of web**

R/S

B=3 **width of upper flange**

R/S

H=0.25 **height of upper flange**

R/S

(Program halts to VIEW the area moment of inertia,
units length4)

R/S

(Program halts to VIEW the location of the x
centroidal axis)

R/S

The result should be

I = 54.6660 (units = length4)

C = 3.9063 (units = length, measured from base)```