(VAR y x)
(RULES
   +(0,y) -> y
   +(s(x),y) -> s(+(x,y))
   *(0,y) -> 0
   *(s(x),y) -> +(*(x,y),y)
   *(x,s(y)) -> +(x,*(x,y))
)
(COMMENT from a collection of Aoto/Toyama, FSCD 2016)