gibt es hoffentlich noch Münzen
wechsle (m:ms) b
  -- die Münze passt noch in den Restbetrag b
  -- d.h. die Ausgabe muss die Münze enthalten (`m :`)
  -- und ein neuer Betrag (b-m) ist zu wechseln
  -- dabei kann ja die Münze m nochmal verwendet
  -- werden (z.B. 2Eur in 4Eur Restbetrag)
  | m <= b     = m : wechsle (m:ms) (b-m)
  -- die Münze passt nicht mehr
  -- dann muss der gleiche Restbetrag aber mit weniger
  -- Münzen gewechselt werden
  | otherwise = wechsle ms b
-- gibt es kei
wechsle (m:ms) b
  -- die Münze passt noch in den Restbetrag b
  -- d.h. die Ausgabe muss die Münze enthalten (`m :`)
  -- und ein neuer Betrag (b-m) ist zu wechseln
  -- dabei kann ja die Münze m nochmal verwendet
  -- werden (z.B. 2Eur in 4Eur Restbetrag)
  | m <= b     = m : wechsle (m:ms) (b-m)
  -- die Münze passt nicht mehr
  -- dann muss der gleiche Restbetrag aber mit weniger
  -- Münzen gewechselt werden
  | otherwise = wechsle ms b
wechsle (m:ms) b
  -- die Münze passt noch in den Restbetrag b
  -- d.h. die Ausgabe muss die Münze enthalten (`m :`)
  -- und ein neuer Betrag (b-m) ist zu wechseln
  -- dabei kann ja die Münze m nochmal verwendet
  -- werden (z.B. 2Eur in 4Eur Restbetrag)
  | m <= b     = m : wechsle (m:ms) (b-m)
  -- die Münze passt nicht mehr
  -- dann muss der gleiche Restbetrag aber mit weniger
  -- Münzen gewechselt werden
  | otherwise = wechsle ms b