Exercise algebra.equations.linear.balance
Description
Solve a linear equation using only balance rules.
Firsts
Rule algebra.equations.linear.balance.remove-div Location [] Term "Just (TCon relation1.eq [TCon arith1.minus [TCon arith1.times [TNum 3,TCon arith1.plus [TVar \"x\",TNum 2]],TNum 18],TCon arith1.unary_minus [TCon arith1.times [TNum 5,TCon arith1.minus [TVar \"x\",TNum 7]]]])" Focus "Just (TCon relation1.eq [TCon arith1.minus [TCon arith1.times [TNum 3,TCon arith1.plus [TVar \"x\",TNum 2]],TNum 18],TCon arith1.unary_minus [TCon arith1.times [TNum 5,TCon arith1.minus [TVar \"x\",TNum 7]]]])" Environment factor=4 Rule algebra.equations.linear.balance.distribute Location [] Term "Just (TCon relation1.eq [TCon arith1.minus [TCon arith1.times [TCon arith1.divide [TNum 3,TNum 4],TVar \"x\"],TNum 3],TCon arith1.plus [TCon arith1.unary_minus [TCon arith1.times [TCon arith1.divide [TNum 5,TNum 4],TVar \"x\"]],TCon arith1.divide [TNum 35,TNum 4]]])" Focus "Just (TCon relation1.eq [TCon arith1.minus [TCon arith1.times [TCon arith1.divide [TNum 3,TNum 4],TVar \"x\"],TNum 3],TCon arith1.plus [TCon arith1.unary_minus [TCon arith1.times [TCon arith1.divide [TNum 5,TNum 4],TVar \"x\"]],TCon arith1.divide [TNum 35,TNum 4]]])" Environment