Continue weapon refactor, gas combinations

src/Dodge/Data/GenFloat.hs

@@ -10,7 +10,7 @@ import Data.Aeson.TH
 
 data GenFloat = ConstFloat {_gfConstant :: Float}
     | UniRandFloat {_gfMin :: Float, _gfMax :: Float}
-    deriving (Eq, Show, Read) --Generic, Flat)
+    deriving (Eq, Ord, Show, Read) --Generic, Flat)
 
 makeLenses ''GenFloat
 deriveJSON defaultOptions ''GenFloat