commutesByPersonAndLocation person location = liftIO $ getCommutes (Destination person location)
commutesByPersonAndLocation person location = liftIO $ getCommutes (Destination person location)
commutesByPersonAndLocation person location = liftIO $ getCommutes (Destination person location)