(defn below-zero "Läuft über `data` und gibt die Elemente bis zum ersten Auftreten eines Wertes >= 0 zurück." [data] [data] (take-while #(< % 0) data))