diff options
| author | rsiddharth <s@ricketyspace.net> | 2019-11-18 17:11:34 -0500 |
|---|---|---|
| committer | rsiddharth <s@ricketyspace.net> | 2019-11-18 17:11:34 -0500 |
| commit | a3cc473443bae2420b7fa6460687eecd7b33a767 (patch) | |
| tree | 86c958c1319bb036621f25f002a563f7a1e41f42 | |
| parent | 452b5c21ee826454577daaf0ad213bfe3b954f55 (diff) | |
net/ricketyspace/ror/ten/source.rkt: Updat eadd-winning-probability.
| -rw-r--r-- | net/ricketyspace/ror/ten/source.rkt | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/net/ricketyspace/ror/ten/source.rkt b/net/ricketyspace/ror/ten/source.rkt index 6fa5228..a2b6a96 100644 --- a/net/ricketyspace/ror/ten/source.rkt +++ b/net/ricketyspace/ror/ten/source.rkt @@ -683,9 +683,10 @@ (place-image (text (string-append "Winning Probability " - (number->string + (~r (probability-of-winning (find-territory source) - (find-territory target)))) + (find-territory target)) + #:precision 2)) TEXT-SIZE TEXT-COLOR) (- WIDTH 150) 100 s) s)) |