sp {elaborate*task*tanksoar
   (state <s> ^superstate nil)
   -->
   (<s> ^name tanksoar)}

sp {elaborate*top-state*top-state
  (state <s> ^name tanksoar)
-->
  (<s> ^top-state <s>)}

sp {elaborate*state*energy*low
   (state <s> ^name tanksoar
              ^io.input-link.energy <= 200)
   -->
   (<s> ^missiles-energy low)}

sp {elaborate*state*missiles*low
   (state <s> ^name tanksoar
              ^io.input-link.missiles 0)
   -->
   (<s> ^missiles-energy low)}

## These are used in retreat/move.soar
sp {elaborate*sidestep-directions
   (state <s> ^name tanksoar)
   -->
   (<s> ^side-direction <sd>)
   (<sd> ^forward right left  
         ^backward right left
         ^right forward backward 
         ^left forward backward)}

