Increase large distance penalty
authorJoachim Breitner <mail@joachim-breitner.de>
Sat, 27 Jun 2009 16:34:52 +0000 (18:34 +0200)
committerJoachim Breitner <mail@joachim-breitner.de>
Sat, 27 Jun 2009 16:34:52 +0000 (18:34 +0200)
src/Lseed/Constants.hs

index 508cd35..76ff99f 100644 (file)
@@ -24,7 +24,7 @@ ticksPerDay = 9
 -- 1 means: Can grow one stipeLength during one day, when catching the sunlight
 -- with one branch of (projected) length screenwidth
 growthPerDayAndLight :: Double
-growthPerDayAndLight = 20.0
+growthPerDayAndLight = 25.0
 
 -- | Plants up to this size get an boost in growths
 smallPlantBoostSize :: Double
@@ -36,7 +36,7 @@ smallPlantBoostLength = 0.2
 
 -- | Cost (in light units) per (sum for all branches (length * distance), to limit the growth of the plants
 costPerLength :: Double
-costPerLength = 0.0005
+costPerLength = 0.001
 
 -- | Cost (in length growths equivalent) per seed to be grown
 seedGrowthCost :: Double