src/LCF/ROOT.ML

fix bug in cancel_factor simprocs so they will work on goals like 'x * y < x * z' where the common term is already on the left

(*  Title:      LCF/ROOT.ML
    Author:     Tobias Nipkow
    Copyright   1992  University of Cambridge
*)

use_thys ["LCF"];