Exercise algebra.equations.linear.balance
Description
Solve a linear equation using only balance rules.
Firsts
Rule algebra.equations.linear.balance.var-right-minus Location [] Term "Just (TCon relation1.eq [TNum 24,TCon arith1.plus [TNum 3,TCon arith1.times [TNum 3,TVar \"x\"]]])" Focus "Just (TCon relation1.eq [TNum 24,TCon arith1.plus [TNum 3,TCon arith1.times [TNum 3,TVar \"x\"]]])" Environment term=3*x Rule algebra.equations.linear.balance.var-left-minus Location [] Term "Just (TCon relation1.eq [TCon arith1.plus [TCon arith1.unary_minus [TCon arith1.times [TNum 3,TVar \"x\"]],TNum 24],TNum 3])" Focus "Just (TCon relation1.eq [TCon arith1.plus [TCon arith1.unary_minus [TCon arith1.times [TNum 3,TVar \"x\"]],TNum 24],TNum 3])" Environment term=6*x Rule algebra.equations.linear.balance.con-right-minus Location [] Term "Just (TCon relation1.eq [TCon arith1.times [TNum 3,TVar \"x\"],TCon arith1.plus [TCon arith1.unary_minus [TNum 21],TCon arith1.times [TNum 6,TVar \"x\"]]])" Focus "Just (TCon relation1.eq [TCon arith1.times [TNum 3,TVar \"x\"],TCon arith1.plus [TCon arith1.unary_minus [TNum 21],TCon arith1.times [TNum 6,TVar \"x\"]]])" Environment term=24 Rule algebra.equations.linear.balance.smart-div Location [] Term "Just (TCon relation1.eq [TCon arith1.plus [TVar \"x\",TNum 8],TCon arith1.plus [TNum 1,TCon arith1.times [TNum 2,TVar \"x\"]]])" Focus "Just (TCon relation1.eq [TCon arith1.plus [TVar \"x\",TNum 8],TCon arith1.plus [TNum 1,TCon arith1.times [TNum 2,TVar \"x\"]]])" Environment factor=3