The Museum of HP Calculators The Museum of HP Calculators
This program is by Ken Delsnider and is used here by permission.
This program is supplied without representation or warranty of any kind. Ken Delsnider 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.
INTEL
Function Use to calculate the Intermediate (INT) Elevation of a point on a line/grade (e.g. sewer).
Also provides the slope for the line/grade.
Where:
EL1 = Elevation of Point 1
STA1 = Station of Point 1
EL2 = Elevation of Point 2
STA2 = Station of Point 2
STAINT = Station of Intermediate Point
ELINT = Elevation of Intermediate Point
SLOPE Slope between Points 1 & 2
00 { 115-Byte Prgm }
01>LBL "INTEL"
02 MVAR "EL1"
03 MVAR "STA1"
04 MVAR "EL2"
05 MVAR "STA2"
06 MVAR "STAINT"
07 MVAR "ELINT"
08 MVAR "SLOPE"
09 RCL "EL2"
10 RCL "EL1"
11 -
12 RCL "STA2"
13 RCL "STA1"
14 -
15 ÷
16 STO "SLOPE"
17 RCL "STAINT"
18 RCL "STA1"
19 -
20 ×
21 RCL "EL1"
22 +
23 RCL "ELINT"
24 -
25 END
Go back to the software library
Go back to the main exhibit hall