function y = descent ( h )

%% DESCENT reports the height of the descending climbers.
%
%  H is the time, in hours. 
%  0 <= H <= 24;
%
%  Y is the height.
%  0 <= Y <= 10000.
%
  hmin = 0.0;
  hmax = 24.0;

  h2 = h;
  h2 = max ( h2, hmin );
  h2 = min ( h2, hmax );

  scale = max ( humps ( hmin / 75.0 + 0.3 ) - 15.0, 0.0 );

  y = ( 10000.0 / scale ) * max ( humps ( h2 / 75.0 + 0.3 ) - 15.0, 0.0 );

  return
end
