Exercise arithmetic.fractions
Description
simplify fractions
Firsts
Rule simplify.enter Location [0] Term "Just (TCon arith1.plus [TCon arith1.divide [TNum 3,TNum 5],TCon arith1.divide [TNum 1,TNum 3]])" Focus "Just (TCon arith1.divide [TNum 3,TNum 5])" Environment