15.14 Initialisiertes Verzögerungsglied

(&) :: a -> [Stream a] -> [Stream a]

(x & [d]) = [e] where e t | t < 0 = bot

| t == 0 = x

| t > 0 = d (t-1)

bot = bot -- undefiniert

x

d

Vorherige Folie

Nächste Folie

Zurück zur ersten Folie

Graphik-Version anzeigen