Biofouling

This function will output the typical required values for mussel growth on structures.

This function will output the typical required values for designing a structure that will be expected to deal with mussel growth.
The user is to enter a fouling type ('mussels'), a typical water temperature in degrees Fahrenheit, a growth duration in years, and a depth in meters.

The function will provide:
1. The weight per area of mussels
2. The drag coefficient
3. The intertial drag coefficient
4. The added mass coefficient
5. The typical region in which the organism lives
6. The growth rate of the organism
7. A table of all values obtained

The function only works with mussels for now, but could be easily expanded to work with other organisms as well.

Nearly all values determined from:
"Appraisal of Marine Growth on Offshore Installations"

Example code implementations:
1. To run the funtion and have only a table of values print out, use the following line:
biofouling('mussels',50,5,12)
where:
1. 'mussels' is the species in question
2. 50 is the average water temperature in degrees Fahrenheit
3. 5 is the number of years
4. 12 is the water depth, in meters, of concern
Note: The depth entered can be either positive or negative with respect to the water line.

2. To run the function and have each value saved as a variable, use the following line:
[Table,Weight,DragCoeff,Cm,AddedMass,Location,GrowthRate] = biofouling('mussels',50,5,12)
where:
1. Each of the terms inside the square brackets are the user's
desired variables for each respective value.
2. 'mussels' is the species in question
3. 50 is the average water temperature in degrees Fahrenheit
4. 5 is the number of years
5. 12 is the water depth, in meters, of concern
Note: The depth entered can be either positive or negative with respect to the water line.