• Home
• com.soartech
• jsoar-performance-testing
• 5.0.1
• source code
• get-digit1.soar

×

Project download

Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance.
Project price only 1 $

You can buy this project and download/modify it how often you want.

APT.all-test.Arithmetic.arithmetic.process-column.get-digit1.soar Maven / Gradle / Ivy

sp {process-column*propose*get-digit1
   (state  ^name process-column
             -^digit1)
-->
   ( ^operator  + =)
   ( ^name get-digit1)
}

sp {process-column*apply*get-digit1
   (state  ^operator.name get-digit1
              ^current-column )
   ( ^digit1 
        -^new-digit1
        -^carry-borrow 1)
-->
   ( ^digit1 )
}

## If there has been a borrow
sp {process-column*apply*get-digit1-new 
   (state  ^operator.name get-digit1
              ^current-column )
   ( ^digit1 
         ^new-digit1 
        -^carry-borrow 1)
-->
   ( ^digit1 )
}