%---------------------------------------------------------
% Overflate- og konturlinjeplott av fjelltoppen Berenberg
%---------------------------------------------------------
h0 = 2277;                          % Høyden av toppen av fjellet (m)
R = 4;                              % Mål for radius av fjellet (km)

[x,y] = meshgrid(-10:.5:10);        % Grid for x- og y-verdiene (km)
h = h0./(1+(x.^2+y.^2)./(R.^2));    % Beregn høyden h (m)

surf(x,y,h)                         % Plott overflaten.
colorbar                            % Corlorbar for å vise "verdien" til de ulike fargene 

axis square                         % Sett aksestørrelsene like