function y=norm(x)
[nx nz]=size(x);
if nx > 1, 
   if nz >1,
   y=x/max(max(s));
   else
   y=x/max(x);
   end
end
if nz > 1, 
   if nx >1,
   y=x/max(max(s));
   else
   y=x/max(x);
   end
end




