module Draw.Widths where

gridres :: Int
gridres = 40

gridresd :: Double
gridresd = fromIntegral gridres

onepix :: Double
onepix = 1 / fromIntegral gridres

twopix, fourpix :: Double
twopix = 2 * onepix
fourpix = 4 * onepix

gridwidth :: Double
gridwidth = onepix

framewidthfactor :: Double
framewidthfactor = 4

edgewidth :: Double
edgewidth = 3 * onepix

borderwidth :: Double
borderwidth = 1 / 4

module Draw.Widths where

gridres :: Int
gridres = 40

gridresd :: Double
gridresd = fromIntegral gridres

onepix :: Double
onepix = 1 / fromIntegral gridres

twopix, fourpix :: Double
twopix = 2 * onepix
fourpix = 4 * onepix

gridwidth :: Double
gridwidth = onepix

framewidthfactor :: Double
framewidthfactor = 4

edgewidth :: Double
edgewidth = 3 * onepix

borderwidth :: Double
borderwidth = 1 / 2

Revert "fix borderwidth for extrudeEnvelope bugfix"
Revert "fix borderwidth for extrudeEnvelope bugfix"

This reverts commit 42ddea993bb43d48e4f443d664cc79acd84458a9.

Wrong branch
