function inntekt = gruvedrift(gruve,kurs)
% Traverserer gruve etter et tilfeldig flytt vha funksjonen gruveflytt()
% LF hvor gruveflytt() returnerer en tabell av to elementer er OK.

    [m n] = size(gruve);

    i = 1;
    j = 1;
    vekt = gruve(1,1);
    while (i < m || j < n)
        % beveger seg mot motsatt kant hvis vi har kommet til en av
        % kantene i == m eller j == n
        if (i == m)
            j = j + 1;
        elseif (j == n)
            i = i + 1;
        else
            [i j] = gruveflytt(i,j);
        end

        vekt = vekt + gruve(i,j);
    end

    inntekt = kurs*vekt;
end