add siOffset and siHeight
[L-seed.git] / src / Lseed / Data.hs
index 745be5b..c3db176 100644 (file)
@@ -57,6 +57,8 @@ data StipeInfo = StipeInfo
        , siAngle     :: Angle
        , siDirection :: Angle
        , siGrowth    :: GrowthState
+       , siOffset    :: Double -- ^ Sideways position, relative to Plant origin
+       , siHeight    :: Double -- ^ Vertical distance from bottom
        }
        deriving (Show)