module Sources where -- TODO: Figure out if any of this is useful. import Types data Source a where Data :: a -> Source a instance SourceState FilePath where stateOfSource = undefined instance SourceState Image where stateOfSource = undefined instance SourceState (String, FilePath) where stateOfSource = undefined