SADL

Program Name:	SADL
Date:		10/95
Subject:	sailing
Size:		57 bytes

REQUIREMENTS
MODULES:	
SUBS:		
HARDWARE: 	

Comments

SADL calculates the sail area-displacement ratio and the displacemet length ratio for a sail boat. the data is entered in the stack as follows:

	
	z	sail area in sqft
	y	displacement in lbs
	x	waterline length in ft

the results are returned to the alpha register for viewing.

The formulas used in the program are:
Sail Area Displacement Ratio -> SAD=SA/(disp/64)^2/3
Displacement Length Ratio -> DL=(disp/2240)/(.01*lwl)^3

DATA STRUCTURE
REG	DATA
00	scratch
01	scratch

PROGRAM LISTING
........................
LBL SADL  
.01  *  3  Y^X  X<>Y  
STO 00  2240  /  X<>Y  /  
STO 01  RDN  RCL 00  64  
/  2  3  /  Y^X  /  
FIX 1  CLA  ARCL X  
"|  "  FIX 0  CF 29  
ARCL 01  AVIEW  SF 29  
FIX 2  END

Note: X<>Y is the swap X and Y function.