function [val] = ShallowWaterDisp(k,h,w,g)
%UNTITLED3 Summary of this function goes here
%   Detailed explanation goes here
k
h
disp(['kh = ' num2str(k*h)]);
disp(['tanh(kh) = ' num2str(tanh(k*h))]);
val = k*tanh(k*h)-(w.^2)/g
end

