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 [TNum 0,TCon arith1.plus [TCon arith1.unary_minus [TCon arith1.times [TNum 7,TVar \"x\"]],TNum 21]])" Focus "Just (TCon relation1.eq [TNum 0,TCon arith1.plus [TCon arith1.unary_minus [TCon arith1.times [TNum 7,TVar \"x\"]],TNum 21]])" Environment factor=15 Rule algebra.equations.linear.flip Location [] Term "Just (TCon relation1.eq [TCon arith1.plus [TCon arith1.unary_minus [TCon arith1.times [TCon arith1.divide [TNum 7,TNum 15],TVar \"x\"]],TCon arith1.divide [TNum 7,TNum 5]],TNum 0])" Focus "Just (TCon relation1.eq [TCon arith1.plus [TCon arith1.unary_minus [TCon arith1.times [TCon arith1.divide [TNum 7,TNum 15],TVar \"x\"]],TCon arith1.divide [TNum 7,TNum 5]],TNum 0])" Environment