Update calculator.scm

Changed multiplication to a linear recursion model