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

Go to download
sp {evaluate-operator*propose*evaluate-bid-likelihood
   (state  ^name evaluate-operator
              ^superstate.operator.superoperator.name bid
              ^bid-difference )
-->
   ( ^operator  + =)
   ( ^name evaluate-bid-likelihood)
}

# 0 and above mean that there are more dice than the bid

sp {apply*evaluate-bid-likelihood*risky
   (state  ^operator 
              ^total-known < 0.0
              ^total-possible >= 0.0
              ^bid-difference { <= 0.0 >= -0.4  }
              ^superstate.operator.evaluation )
   ( ^name evaluate-bid-likelihood)
-->
   (write (crlf) |  Bid success likelihood is risky.|)
   ( ^symbolic-value risky
        ^bid-difference ) # for my bid
}

sp {apply*evaluate-bid-likelihood*very-risky
   (state  ^operator 
              ^total-known < 0.0
              ^total-possible >= 0.0
              ^bid-difference { < -0.4  }
              ^superstate.operator.evaluation )
   ( ^name evaluate-bid-likelihood)
-->
   (write (crlf) |  Bid success likelihood is very risky.|)
   ( ^symbolic-value very-risky
        ^bid-difference ) # for my bid
}

sp {apply*evaluate-bid-likelihood*safe
   (state  ^operator 
              ^total-known < 0.0
              ^total-possible >= 0.0
              ^bid-difference { > 0.0  }
              ^superstate.operator.evaluation )
   ( ^name evaluate-bid-likelihood)
-->
   (write (crlf) |  Bid success likelihood is safe.|)
   ( ^symbolic-value safe
        ^bid-difference ) # for my bid
}


sp {apply*evaluate-bid-likelihood*lose
   (state  # ^operator 
        ^total-possible < 0.0
        ^superstate.operator )
   ( ^evaluation 
         ^superoperator )
  -( ^name challenge)
 #  ( ^name evaluate-bid-likelihood)
-->
   (write (crlf) |  Bid success likelihood is lose.|)
   ( ^symbolic-value lose) # for me to bid
}

# only make non-push case certain
sp {apply*evaluate-bid-likelihood*certain
   (state  # ^operator 
        ^total-known >= 0.0
        ^superstate.operator )
   ( ^evaluation 
         ^superoperator )
  -( ^name challenge)
#   ( ^name evaluate-bid-likelihood)
-->
   (write (crlf) |  Bid success likelihood is certain.|)
   ( ^symbolic-value certain) # for me to bid
}