Extra Code
ask (patch-set [sphere_influence] of (one-of (citizens with [not informant? and not detained?])))
[set pcolor pink]
to propensity_shift
ask citizens with [not informant?] [
if (count_rebels > count_detained) [
let n ((count_rebels - count_detained) / count citizens-on sphere_influence)
set propensity_to_rebel ((rebellion_factor * n * (1 - propensity_to_rebel)) +
propensity_to_rebel)
]
]
end
to calc_detainment_influence
ask citizens [set detainment_influence (count (citizens-on sphere_influence) with [detained?] /
count (citizens-on sphere_influence))]
end