Passing zwei Argumente von unterschiedlichen Typen

Question

Ich möchte eine Funktion erstellen, machen wir es altHead nennen, die zwei Variablen nimmt und gibt eine Variable, so dass:

a -> [a] -> a 

ich es so nennen wollen:

altHead 3 [1,2,3,4] 

Was es tun soll, ist die erste Variable und die Liste zu sehen. Wenn die Liste leer ist, geben Sie den Wert der ersten Variablen zurück. Andernfalls geben Sie die Liste zurück.

In diesem Fall habe ich den folgenden Code geschrieben.

altHead :: a -> [a] -> a 
altHead (x:xs) = if null[xs] then [x] else [xs] 

Allerdings glaube ich, dass x: xs nur durch die Liste schaut.

Ich bin ein bisschen fest, wie man das ändert, so dass es auch auf den ersten Wert schaut, und wie man den ersten Wert in die Funktion einbezieht.

Answer 1

Sie wollen so etwas wie:

altHead :: a -> [a] -> a 
altHead a xs = if null xs then a else head xs 

oder alternativ Muster auf der Liste passend mit:

altHead :: a -> [a] -> a 
altHead a [] = a 
altHead a (x:xs) = x