APPEHDIX A 

 Computer Program for Computation of Wave Velocities as a 

 Function of Wave Period and Water Depth 

 PROGRAM TITLE : COMPV. 

 Variables Used in Program : 



N0TT....O Number of different wave periods for which velocity computa- 

 tions are to be made. 



TT Wave period (seconds) . 



K^DEP. ....... . Water depth (feet). 



CXX(k) Wave velocity (feet/second) for water of K depth. 



XL 1/2 deep-water wave length (feet) for a wave of TT period. 



L XL rounded down to the nearest integer. 



Summary of Program : 



NOTT and the first TT are the first variables input to the computer. For 



water of K depths where K ranges from 1 to L in one-foot increments, CXX's 



are then computed by an iteration proCediore so that the third digit to the 



right of the decimal is significant. After all CXX's have been computed 



for the first TT, they are rounded to the nearest hundredth and output. 



Computations then proceed using the next TT. After computations have been 



made using NOTT different TT ' s, the program stops . 



Remarks : 



If wave periods greater than 20 seconds are to be used with this program, 



CXX will require larger dimensions. 



The output from this program consists of a table of water depths and asso^- 



ciated wave velocities for each specified wave period. The CXK values of 



these serve as input for the DISTV program in Appendix B. 



30 



