<div style='font-family:Arial; font-size:13px;'>Hi,<div><br></div><div>safeHead.hs</div><div><br></div><div><div style="line-height: 19px;"><div style="font-family: Consolas, "Courier New", monospace; font-size: 14px; white-space: pre;"><span style="background-color: rgb(255, 255, 255);">safeHead :: [a] -> Maybe a</span></div><div style="font-family: Consolas, "Courier New", monospace; font-size: 14px; white-space: pre;"><span style="background-color: rgb(255, 255, 255);">safeHead []    = Nothing</span></div><div style="font-family: Consolas, "Courier New", monospace; font-size: 14px; white-space: pre;"><span style="background-color: rgb(255, 255, 255);">safeHead (x:_) = Just x</span></div><div style="font-family: Consolas, "Courier New", monospace; font-size: 14px; white-space: pre;"><span style="background-color: rgb(255, 255, 255);"><br></span></div><div style=""><span style="font-family: Consolas, "Courier New", monospace; font-size: 14px; white-space: pre; background-color: rgb(255, 255, 255);">prelude> </span><font face="Consolas, Courier New, monospace"><span style="font-size: 14px; white-space: pre;">safeHead [23,1,4,2,4,2]</span></font></div><div style=""><font face="Consolas, Courier New, monospace"><span style="font-size: 14px; white-space: pre;">Just 23</span></font></div><div style="font-family: Consolas, "Courier New", monospace; font-size: 14px; white-space: pre;"><span style="background-color: rgb(255, 255, 255);"><br></span></div><div style="font-family: Consolas, "Courier New", monospace; font-size: 14px; white-space: pre;"><span style="background-color: rgb(255, 255, 255);"><br></span></div><div style="font-family: Consolas, "Courier New", monospace; font-size: 14px; white-space: pre;"><span style="background-color: rgb(255, 255, 255);">Question:</span></div><div style="font-family: Consolas, "Courier New", monospace; font-size: 14px; white-space: pre;"><span style="background-color: rgb(255, 255, 255);">what am i doing wrong?</span></div><div style="font-family: Consolas, "Courier New", monospace; font-size: 14px; white-space: pre;"><span style="background-color: rgb(255, 255, 255);"><br></span></div><div style="font-family: Consolas, "Courier New", monospace; font-size: 14px; white-space: pre;"><span style="background-color: rgb(255, 255, 255);">best,</span></div><div style="font-family: Consolas, "Courier New", monospace; font-size: 14px; white-space: pre;"><span style="background-color: rgb(255, 255, 255);"><br></span></div><div style="font-family: Consolas, "Courier New", monospace; font-size: 14px; white-space: pre;"><span style="background-color: rgb(255, 255, 255);">Alexander  </span></div></div><span style="background-color: rgb(255, 255, 255);"><br></span><div><div style="font-family:Arial; font-size:13px;"><br></div></div></div></div>