The Museum of HP Calculators

P&S Seismic Wave Velocity Determination for the HP-41C/CV/CX

This program is Copyright © HP and is used here by permission. It was originally printed in the HP-67 Earth Sciences Solution Book. This program was ported to the HP-41C by reading with the HP-41C card reader and the card reader may be required for operation of this program. This program was entered and uploaded by Tony Duell.

This program is supplied without representation or warranty of any kind. Tony Duell, Hewlett Packard 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.

Documentation Information (CD or source code)
How to get this Program to your Calculator (via HP-IL, disk, wand, and fingers)
Download Binary (.raw) program for disk or PC HP-IL Card download
Download Hexadecimal (.dat) program for Serial Port download

Program Listing

LINE  KEYS
 01 LBL "PSWAVE"
 02 LBL 12
 03 LBL C
 04 7DSP5
 05 STO 03
 06 RDN
 07 STO 02
 08 RDN
 09 STO 01
 10 SF 01
 11 SF 02
 12 RTN
 13 LBL 10
 14 LBL A
 15 1
 16 FS? 01
 17 STO 04
 18 SF 01
 19 RCL 03
 20 ENTER
 21 4
 22 *
 23 3
 24 /
 25 RCL 02
 26 +
 27 RCL 01
 28 /
 29 SQRT
 30 ST* 04
 31 RCL 04
 32 7PRTX
 33 RTN
 34 LBL 11
 35 LBL B
 36 1
 37 FS?C 02
 38 STO 05
 39 SF 02
 40 RCL 03
 41 ENTER
 42 RCL 01
 43 /
 44 SQRT
 45 ST* 05
 46 RCL 05
 47 7PRTX
 48 RTN
 49 LBL 13
 50 LBL D
 51 CF 01
 52 CF 02
 53 .00001
 54 STO 04
 55 STO 05
 56 RTN
 57 LBL 14
 58 LBL E
 59 CF 01
 60 CF 02
 61 .032808399
 62 STO 04
 63 STO 05
 64 RTN
 65 STOP
 66 END

Go back to the HP-41 software library
Go back to the general software library
Go back to the main exhibit hall