Fix jetpack

2021-04-24 20:24:33 +02:00
parent 71795d2d9d
commit 24ea24cd6d
3 changed files with 12 additions and 3 deletions
@@ -232,6 +232,7 @@ data Stance = Stance
  deriving (Eq,Show)
 data Carriage 
    = Walking { _stepCycle :: Int, _stepToAdd :: Int }
+    | Standing
    | Floating
    | Boosting Point2
  deriving (Eq,Show)