module TextExample (
    textExample
) where

import qualified Waterfall

textExample :: FilePath -> Double -> String -> Double -> IO Waterfall.Solid
textExample :: FilePath -> Double -> FilePath -> Double -> IO Solid
textExample FilePath
fontpath Double
fontSize FilePath
content Double
depth = do
    font <- FilePath -> Double -> IO Font
Waterfall.fontFromPath FilePath
fontpath Double
fontSize
    return . Waterfall.prism depth $ Waterfall.text font content