42      2   ls, rowPtr, colPtr, D, G, L, R)  argument
50       TYPE(svLS_subLsType), INTENT(INOUT) :: ls  local
65       ls%suc   = .FALSE.
67       ls%iNorm = errO
68       eps      = MAX(ls%absTol,ls%relTol*errO)
75       DO i=1, ls%mItr
77             ls%suc = .TRUE.
105       ls%fNorm = SQRT(err)
106       ls%callD = CPUT() - time + ls%callD
107       ls%dB    = 5D0*LOG(err/errO)
108       ls%itr   = ls%itr + i - 1
117       SUBROUTINE CGRADV(dof, nNo, nnz, mynNo, commu, cS, ls,   argument
125       TYPE(svLS_subLsType), INTENT(INOUT) :: ls  local
137       ls%callD = CPUT()
138       ls%suc   = .FALSE.
140       ls%iNorm = err
141       eps      = MAX(ls%absTol,ls%relTol*err)
147       DO i=1, ls%mItr
149             ls%suc = .TRUE.
165       ls%itr   = i - 1
166       ls%fNorm = SQRT(err)
167       ls%callD = CPUT() - ls%callD
168       ls%dB    = 5D0*LOG(err/errO)
169       IF (i .GT. ls%mItr) ls%itr = ls%mItr
176       SUBROUTINE CGRADS(nNo, nnz, mynNo, commu, cS, ls,   argument
184       TYPE(svLS_subLsType), INTENT(INOUT) :: ls  local
196       ls%callD = CPUT()
197       ls%suc   = .FALSE.
199       ls%iNorm = err
200       eps      = MAX(ls%absTol,ls%relTol*err)
206       DO i=1, ls%mItr
208             ls%suc = .TRUE.
222       ls%itr   = i - 1
223       ls%fNorm = SQRT(err)
224       ls%callD = CPUT() - ls%callD
225       ls%dB    = 5D0*LOG(err/errO)
226       IF (i .GT. ls%mItr) ls%itr = ls%mItr