% Berechnung der kleinsten Fibonacci-Zahl >= m
function f = fib2(m)
  f_alt = 1;
  f = 1;
  while f < m
    f_neu = f + f_alt;
    f_alt = f;
    f = f_neu;
  end
end