module TextExample (
    textExample
) where

import qualified Waterfall

textExample :: FilePath -> Double -> String -> Double -> Waterfall.Solid
textExample :: FilePath -> Double -> FilePath -> Double -> Solid
textExample FilePath
fontpath Double
fontSize FilePath
content Double
depth = 
    let font :: Font
font = FilePath -> Double -> Font
Waterfall.fontFromPath FilePath
fontpath Double
fontSize
    in Double -> Shape -> Solid
Waterfall.prism Double
depth (Shape -> Solid) -> Shape -> Solid
forall a b. (a -> b) -> a -> b
$ Font -> FilePath -> Shape
Waterfall.text Font
font FilePath
content