let transition_rule = transition_rule rule_prng grain_probability