diff options
Diffstat (limited to 'src/Wetterhorn/Layout/Full.hs')
-rw-r--r-- | src/Wetterhorn/Layout/Full.hs | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/src/Wetterhorn/Layout/Full.hs b/src/Wetterhorn/Layout/Full.hs new file mode 100644 index 0000000..8296c7b --- /dev/null +++ b/src/Wetterhorn/Layout/Full.hs @@ -0,0 +1,18 @@ +module Wetterhorn.Layout.Full where + +import Data.Data (Typeable) +import Data.Default +import Wetterhorn.Constraints +import Wetterhorn.Core.W + +data Full = Full + deriving (Read, Show, Typeable) + +instance Default Full where + def = Full + +instance LayoutClass Full where + type C Full = Unconstrained + + pureLayout (a : _) _ = [(a, RationalRect 1 1 1 1)] + pureLayout _ _ = [] |