module Graphics.Gnuplot.File (T(Cons, name, content), write) where

import qualified Graphics.Gnuplot.Private.File as File

data T =
   Cons {
      T -> FilePath
name :: FilePath,
      T -> FilePath
content :: String
   }
   deriving (Int -> T -> ShowS
[T] -> ShowS
T -> FilePath
(Int -> T -> ShowS) -> (T -> FilePath) -> ([T] -> ShowS) -> Show T
forall a.
(Int -> a -> ShowS) -> (a -> FilePath) -> ([a] -> ShowS) -> Show a
showList :: [T] -> ShowS
$cshowList :: [T] -> ShowS
show :: T -> FilePath
$cshow :: T -> FilePath
showsPrec :: Int -> T -> ShowS
$cshowsPrec :: Int -> T -> ShowS
Show, T -> T -> Bool
(T -> T -> Bool) -> (T -> T -> Bool) -> Eq T
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: T -> T -> Bool
$c/= :: T -> T -> Bool
== :: T -> T -> Bool
$c== :: T -> T -> Bool
Eq)


write :: T -> IO ()
write :: T -> IO ()
write (Cons FilePath
fn FilePath
cont) = FilePath -> FilePath -> IO ()
writeFile FilePath
fn FilePath
cont

instance File.C T where
   write :: T -> IO ()
write = T -> IO ()
write