Ein bischen Ersti sein …

… oder wann hab ich zuletzt bis halb 3h gebraucht um das halbe Übungsblatt fertig zu bekommen. ML ist wirklich unglaublich nervig, man zeige mir den Menschen der sowas schön findet:


fun walk2 (Node(a, nil)::nil) i f g = f i a
| walk2 (Node(a, l)::nil) i f g = f (walk2 l i f g) a
| walk2 (Node(a, nil)::l) i f g = f (walk2 l i f g) a
| walk2 (Node(a, l)::tail) i f g = g (walk2 l i f g) (walk2 tail i f g) a;