Lines Matching refs:uBrg
56 & uBrg(nshg,nflow,Kspace+1)
120 uBrg(:,:,1) = res
175 uBrg(:,:,1) = temp
196 uBrg(:,:,1) = uBrg(:,:,1) / unorm
203 uBrg(:,:,iKs+1) = uBrg(:,:,iKs)
211 call Au1GMR ( EGmass, uBrg(:,:,iKs+1), ilwork, iBC,iper)
215 call bc3per (iBC, uBrg(:,:,iKs+1), iper, ilwork, nflow)
228 temp = uBrg(:,:,iKs+1) * uBrg(:,:,1) ! {u_{i+1}*u_1} vector
235 uBrg(:,:,iKs+1) = uBrg(:,:,iKs+1) - beta * uBrg(:,:,jK-1)
237 temp = uBrg(:,:,iKs+1) * uBrg(:,:,jK) !{u_{i+1}*u_j} vector
256 uBrg(:,:,iKs+1) = uBrg(:,:,iKs+1) / unorm ! normalize the next Krylov
316 Dy = Dy + yBrg(jK) * uBrg(:,:,jK)
427 & uBrg(nshg,nflow,Kspace+1)
499 uBrg(:,:,1) = res
552 uBrg(:,:,1) = temp
573 uBrg(:,:,1) = uBrg(:,:,1) / unorm
580 uBrg(:,:,iKs+1) = uBrg(:,:,iKs)
586 & uBrg(:,:,iKs+1) )
592 call bc3per (iBC, uBrg(:,:,iKs+1), iper, ilwork, nflow)
602 temp = uBrg(:,:,iKs+1) * uBrg(:,:,1) ! {u_{i+1}*u_1} vector
609 uBrg(:,:,iKs+1)=uBrg(:,:,iKs+1)-beta * uBrg(:,:,jK-1)
611 temp = uBrg(:,:,iKs+1) * uBrg(:,:,jK) !{u_{i+1}*u_j} vector
631 uBrg(:,:,iKs+1) = uBrg(:,:,iKs+1) / unorm ! normalize the next Krylov
691 Dy = Dy + yBrg(jK) * uBrg(:,:,jK)