function dx = ressourcen_fkt(t,x)
    
    e = 0.05; 
    g = 1.0;
    i = 0.1;
    k = 1.0;
    m = 1.0;
    p = 1.0;
    q = 0.1;
    r = 0.1;

    if x(1)<e
       v=0;
    else  
       v=r;
    end
    
    s = p*x(1)*x(2);
    b = (m*p*x(1)-q)/(m*p*k);
    
    dx = zeros(3,1);              % Spaltenvektor mit 3 Zeilen und 1 Spalte [a column vector]
    dx(1) = v*x(1)*(1-x(1)/k)-s;  % Ressource (z.B. Fische im See)
    dx(2) = i*x(2)*(1-s/g)*b;     % Kapitalbestand (Aktueller Fischbestand im See)
    dx(3) = m*s-q*x(2);           % akkumulierter Gewinn (Profit durch verkaufte Fische)

end