module Dodge.Placement.Instance.Creature where import Dodge.LevelGen.Data import Dodge.RandomHelp import Dodge.Creature.ArmourChase import Dodge.Creature.ChaseCrit randC1 :: PSType randC1 = RandPS $ takeOne $ map PutCrit $ armourChaseCrit : replicate 50 chaseCrit