nonstrictunif-optimize
This package contains a tool which replaces occurrences of (fp =:<= x) by (fp =:<<= x) if the functional pattern fp always evaluates to a linear term.
(fp =:<= x)
(fp =:<<= x)
fp