From 0ef5faed9128ec6cc854e1871c83c9b1c2045d6a Mon Sep 17 00:00:00 2001 From: Brummel Date: Mon, 30 Mar 2026 10:31:45 +0200 Subject: [PATCH] Remove unused Propa example The `Propa.myc` example was not being used and has been removed to clean up the examples directory. --- examples/Propa.myc | 11 ----------- examples/data_stream_print.myc | 16 +++++++++++++++- 2 files changed, 15 insertions(+), 12 deletions(-) delete mode 100644 examples/Propa.myc diff --git a/examples/Propa.myc b/examples/Propa.myc deleted file mode 100644 index c672556..0000000 --- a/examples/Propa.myc +++ /dev/null @@ -1,11 +0,0 @@ - -(do - (def last (fn [s] (s 0))) - - (def f (fn [n] n)) - - (def r (series 5)) - (push r 4) - - [(last f) (last r)] -) diff --git a/examples/data_stream_print.myc b/examples/data_stream_print.myc index f4982bf..079f8c3 100644 --- a/examples/data_stream_print.myc +++ b/examples/data_stream_print.myc @@ -8,7 +8,6 @@ (def cnt 1) (def gs (series 2)) -;IDEE (pipe lookback [EURUSD acc] --> series acc (pipe [EURUSD GER40] (fn [eu ge] (do @@ -20,4 +19,19 @@ ) ) ) + + ; TODO: IDEE - pipe mit automatischer Value-Akkumulation: pipe + + (pipe 2 [EURUSD GER40] + (fn [eu ge] + (do + ; eu und ge werden hier zu Serien mit lookback 2 + (def dax (.close (ge 0))) + (push gs dax) + (def eur (- dax (ge 1))) + (print cnt ": dax=" eur " (" (/ eur (.close (eu 0))) "$)" ) + (assign cnt (+ cnt 1)) + ) + ) + ) )