function []=pkh_plot(pkh,FREQ,case_name)
% Plot the horizontal wave number in the complex plane.
%
figure;
plot(real(pkh),imag(pkh),'r*');
%
xlabel('Real Wave Number (1/m)');
ylabel('Imaginary Wave Number (1/m)');
%
title(case_name);