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.unary_minus [TNum 4],TCon arith1.minus [TCon arith1.unary_minus [TVar \"x\"],TNum 9]])" Focus "Just (TCon relation1.eq [TCon arith1.unary_minus [TNum 4],TCon arith1.minus [TCon arith1.unary_minus [TVar \"x\"],TNum 9]])" Environment factor=12 Rule algebra.equations.linear.flip Location [] Term "Just (TCon relation1.eq [TCon arith1.minus [TCon arith1.unary_minus [TCon arith1.times [TCon arith1.divide [TNum 1,TNum 12],TVar \"x\"]],TCon arith1.divide [TNum 3,TNum 4]],TCon arith1.unary_minus [TCon arith1.divide [TNum 1,TNum 3]]])" Focus "Just (TCon relation1.eq [TCon arith1.minus [TCon arith1.unary_minus [TCon arith1.times [TCon arith1.divide [TNum 1,TNum 12],TVar \"x\"]],TCon arith1.divide [TNum 3,TNum 4]],TCon arith1.unary_minus [TCon arith1.divide [TNum 1,TNum 3]]])" Environment