Program Name:	MCR  (MOTION COMFORT RATIO)
Date:		1/99		
Subject:	BOATS/SAILING	
Size:		

REQUIREMENTS
MODULES:	
SUBS:		
HARDWARE: 	

Comments
Calculates the Motion Comfort Ratio for a sail boat. Input the boats displacement, beam, water line length (LWL) and overall length (LOA) in that order. The MCR is returned in X. Register 00 is used to store the displacement, all other calculations are done in the stack. 
Input     Output
X-disp    X-MCR
Y-beam
Z-lwl
T-loa

Formula used IN MCR

MCR = DISP / (.65*BEAM^4/3 (.7*LWL+.3*LOA))

PROGRAM LISTING
LBL MCR
R^
STO 00
RDN
.3
*
X<>Y
.7
*
+
X<>Y
4
3
/
Y^X
.65
*
*
RCL 00
XY
/
END

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