\begin{Schunk}
\begin{Sinput}
 z <- .Call(C_Cdqrls, x, y, tol, FALSE)
\end{Sinput}
\end{Schunk}
