• Home
• com.soartech
• jsoar-performance-testing
• 5.0.1
• source code
• write-result.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.Arithmetic-smem.arithmetic.process-column.write-result.soar Maven / Gradle / Ivy

## Won't chunk correctly because carry-borrow is a local negation!

sp {process-column*propose*write-result
   (state  ^name process-column
              ^result 
             -^carry-borrow.digit 1
             -^current-column.result)
-->
   ( ^operator  + =)
   ( ^name write-result)
}

# This is required so that chunking works correctly - argh!
sp {process-column*propose*write-result2
   (state  ^name process-column
              ^result 
              ^carry-borrow.digit 1
              ^current-column )
   ( ^next-column.carry-borrow
        -^result)
-->
   ( ^operator  + =)
   ( ^name write-result)
}

sp {process-column*apply*write-result
   (state  ^operator.name write-result
              ^result 
              ^current-column )
-->
   ( ^result )
}