Add elemDVarEnv

I need this in a later patch

compiler/basicTypes/VarEnv.hs

@@ -32,7 +32,7 @@ module VarEnv (
         dVarEnvElts,
         extendDVarEnv, extendDVarEnv_C,
         extendDVarEnvList,
-        lookupDVarEnv,
+        lookupDVarEnv, elemDVarEnv,
         isEmptyDVarEnv, foldDVarEnv,
         mapDVarEnv,
         modifyDVarEnv,
@@ -571,6 +571,9 @@ delDVarEnvList = delListFromUDFM
 isEmptyDVarEnv :: DVarEnv a -> Bool
 isEmptyDVarEnv = isNullUDFM
 
+elemDVarEnv :: Var -> DVarEnv a -> Bool
+elemDVarEnv = elemUDFM
+
 extendDVarEnv_C :: (a -> a -> a) -> DVarEnv a -> Var -> a -> DVarEnv a
 extendDVarEnv_C = addToUDFM_C