function [] = blatt2_grenzwinkel(F,G,mu)

% F  = 720; % Gewichtskraft Student
% G  =  80; % Gewichtskraft Leiter
% mu = 0.1; % Reibkoeffizient

L = 1.0;          % Länge der Leiter
S = (0:L/100:L)'; % Höhe des Student auf der Leiter


% Grenzwinkel ohne Student
alpha_ohne = (360/(2*pi))*atan(mu*2);

% Grenzwinkel mit Student
N = G+F;
tmp = (1/2)*G + (S/L)*F;
alpha_mit = (360/(2*pi))*atan(mu*N./tmp);

plot(S, [alpha_mit ones(size(S))*alpha_ohne]);
legend('\alpha_H(S) mit Student', '\alpha_H ohne Student');