forwardSYMInExpr nm expr@(Binary op exprL exprR _)
    |   elem op ["="] = case exprL of
                            ID exprL' _ -> forwardSYMInExpr nm exprR
                            _ -> or [forwardSYMInExpr nm exprL, forwardSYMInExpr nm exprR]
    |   otherwise = or [forwardSYMInExpr nm exprL, forwardSYMInExpr nm exprR]
forwardSYMInExpr nm expr@(Binary op exprL exprR _)
    |   elem op ["="] = case exprL of
                            ID exprL' _ -> forwardSYMInExpr nm exprR
                            _ -> or [forwardSYMInExpr nm exprL, forwardSYMInExpr nm exprR]
    |   otherwise = or [forwardSYMInExpr nm exprL, forwardSYMInExpr nm exprR]
forwardSYMInExpr nm expr@(Binary op exprL exprR _)
    |   elem op ["="] = case exprL of
                            ID exprL' _ -> forwardSYMInExpr nm exprR
                            _ -> or [forwardSYMInExpr nm exprL, forwardSYMInExpr nm exprR]
    |   otherwise = or [forwardSYMInExpr nm exprL, forwardSYMInExpr nm exprR]