floatIsDupable dflags (FloatLet (NonRec _ r)) = exprIsDupable dflags r
floatIsDupable dflags (FloatLet (NonRec _ r)) = exprIsDupable dflags r
floatIsDupable dflags (FloatLet (NonRec _ r)) = exprIsDupable dflags r