Development.Shake.Rule
type ShakeValue a
class Rule key value
data EqualCost
rule
apply
apply1
trackUse
trackChange
trackAllow
defaultRule