function [x,a]=hilbertnormalize(x,r)% The function HILBERTNORMALIZE normalizes data using its own Hilbert transformation.% % Non MATLAB Library function used is: HILBTM% First argument is required. If not passed, second argument defaults to 0.% If flipping of data is desired r should be set to 1.%% Calling sequence-% [x,a]=hilbertnormalize(x[,r])%% Input-%	x	- 2-D input data x(m,n)%	r	- flipping mode % Output-%	x	- 2-D normalized data%	a	- 2-D Hilbert envelope%% Used by-% 	FA % Kenneth Arnold (NASA GSFC)	Summer 2003 Initial% NEH replaced HILBT with HILBTM  23 March 2005