APT.all-test.dice-model-bot-new.Impasse_Tie.evaluate-operator.compute-bid-difference.soar Maven / Gradle / Ivy

Go to download
 
sp {evaluate-operator*propose*compute-bid-difference
   (state  ^name evaluate-operator
             -^estimated-total
              ^top-state.probabilities false
              ^superstate.operator.superoperator )
   ( ^name bid
        -^push-face
         ^face 
         ^multiplier )
-->
   ( ^operator  + =)
   ( ^name compute-bid-difference
         ^face 
         ^multiplier )
}

sp {apply*compute-bid-difference*1*bid
   (state  ^operator 
              ^dice-counts.dice-count  )
   ( ^name compute-bid-difference
         ^face 1
         ^multiplier )
   ( ^face 1
          ^count )
   ( ^face unknown
          ^count )
-->
   (write (crlf) |  Bid: |  | 1's. Estimated total: | (+ (/  6) ) | Bid Difference: | (- (+ (/  6) ) ))
   ( ^total-known (-  )
        ^total-possible (- (+  ) )
        ^estimated-total (+ (/  6) )
        ^bid-difference (float (- (+ (/  6) ) )))
}

sp {apply*compute-bid-difference*special-rules*bid
   (state  ^operator 
              ^top-state 
              ^dice-counts.dice-count  )
   ( ^name compute-bid-difference
         ^face { <> 1  }
         ^multiplier )
   ( ^io.input-link.state.special true)
   ( ^face 
          ^count )
   ( ^face unknown
          ^count )
-->
   (write (crlf) |  Bid: |  | |  |'s. Estimated total: | (+ (/  6) ) | Bid Difference: | (- (+ (/  6) ) ) | special rules|)
   ( ^total-known (-  )
        ^total-possible (- (+  ) )
        ^estimated-total (+ (/  6) )
        ^bid-difference (float (- (+ (/  6) ) )))
}

sp {apply*compute-bid-difference*not-special-rules*bid
   (state  ^operator 
              ^top-state 
         ^dice-counts.dice-count   )
   ( ^name compute-bid-difference
         ^face { <> 1  }
         ^multiplier )
   ( ^io.input-link.state.special false)
   ( ^face 
          ^count )
   ( ^face 1
          ^count )
   ( ^face unknown
          ^count )
-->
   (write (crlf) |  Bid: |  | |  |'s. Estimated total: | (+ (/  3)  ) | Bid Difference: | (- (+ (/  3)  ) ) | normal rules|)
   ( ^total-known (- (+   ) )
        ^total-possible (- (+   ) )
        ^estimated-total (+ (/  3)  )
        ^bid-difference (float (- (+ (/  3)  ) )))
}