INTEGER diagCG_prtResFrq
& diagCG_maxIters, diagCG_prtResFrq,
I diagCG_prtResFrq, myThid )
diagCG_prtResFrq = printResidualFreq
& diagCG_pcOffDFac, diagCG_prtResFrq, xPsi0, yPsi0,