16 lines
470 B
Haskell
16 lines
470 B
Haskell
module FunctionImplementations.Pure
|
|
( IsImageFilename(..)
|
|
, ConvertedImageFilename(..)
|
|
) where
|
|
|
|
import Sources()
|
|
import Types
|
|
|
|
data IsImageFilename = IsImageFilename deriving (Show)
|
|
instance IsFunction IsImageFilename FilePath Bool where
|
|
runF IsImageFilename _path = undefined
|
|
|
|
data ConvertedImageFilename = ConvertedImageFilename deriving (Show)
|
|
instance IsFunction ConvertedImageFilename FilePath FilePath where
|
|
runF ConvertedImageFilename _path = undefined
|