<div style="font-family: Consolas, "Courier New", monospace; font-size: 14px; line-height: 19px; white-space: pre;"><div style=""><span style="background-color: rgb(255, 255, 255);">import Data.Time</span></div><span style="background-color: rgb(255, 255, 255);"><br></span><div style=""><span style="background-color: rgb(255, 255, 255);">data DatabaseItem = DbString String</span></div><div style=""><span style="background-color: rgb(255, 255, 255);">                  | DbNumber Integer</span></div><div style=""><span style="background-color: rgb(255, 255, 255);">                  | DbDate   UTCTime</span></div><div style=""><span style="background-color: rgb(255, 255, 255);">                  deriving  (Eq, Ord, Show)</span></div><span style="background-color: rgb(255, 255, 255);"><br></span><div style=""><span style="background-color: rgb(255, 255, 255);">theDatabase :: [DatabaseItem]</span></div><div style=""><span style="background-color: rgb(255, 255, 255);">theDatabase =</span></div><div style=""><span style="background-color: rgb(255, 255, 255);">    [ DbDate (UTCTime</span></div><div style=""><span style="background-color: rgb(255, 255, 255);">             (fromGregorian 1911 5 1)</span></div><div style=""><span style="background-color: rgb(255, 255, 255);">      (secondsToDiffTime 34250))</span></div><div style=""><span style="background-color: rgb(255, 255, 255);">    , DbNumber 9001</span></div><div style=""><span style="background-color: rgb(255, 255, 255);">    , DbString "Hello, world!"</span></div><div style=""><span style="background-color: rgb(255, 255, 255);">    , DbDate (UTCTime</span></div><div style=""><span style="background-color: rgb(255, 255, 255);">             (fromGregorian 1921 5 1)</span></div><div style=""><span style="background-color: rgb(255, 255, 255);">             (secondsToDiffTime 34123))</span></div><div style=""><span style="background-color: rgb(255, 255, 255);">    ]</span></div></div><br><div><div style="font-family:Arial; font-size:13px;"><br></div></div><div style="font-family:Arial; font-size:13px;">My question:</div><div style="font-family:Arial; font-size:13px;"><br></div><div style="font-family:Arial; font-size:13px;">I want to get the UTCTime.</div><div style="font-family:Arial; font-size:13px;"><br></div><div style="font-family:Arial; font-size:13px;">So,  thisFunction :: [DatabaseItem] -> [UTCTime]</div><div style="font-family:Arial; font-size:13px;"><br></div><div style="font-family:Arial; font-size:13px;">I don't need the answer but more the intuition (a link to a youtube etc. is also possible) how to handle these types of situations. Because i keep trying to think in terms of key:values (Python,Julia) which doesn't seem the right paradigm to approach this.</div><div style="font-family:Arial; font-size:13px;"><br></div><div style="font-family:Arial; font-size:13px;">thanks in advance!</div><div style="font-family:Arial; font-size:13px;"><br></div><div style="font-family:Arial; font-size:13px;">best,</div><div style="font-family:Arial; font-size:13px;"><br></div>