     (check-in-range res 0.975 1.025 (str "Prosperity humidity modifier for " biome " at " humidity " : " res))
     res))
 
-
 (defn prosperity-temperature-multiplier-at [world pos]
   (let [biome (biome-at world pos)
         temperature (temperature-at world pos)]

    (Population. new-children new-young-men new-young-women new-old-men new-old-women)))

(defn update-tribe-population
  "TODO this sum the various deltas to the tribe population"
  [tribe deltas]
  (let [new-population (reduce sum-population (.population tribe) deltas)]
    (assoc tribe :population new-population)))

    [civs.logic.globals :refer :all])
  (:import [civs.model.core Population Tribe]))

(import '(com.github.lands Biome))

(require '[civs.model.core :as model])
