Searched defs:ElmGMR (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | elmgmr.f | 1 subroutine ElmGMR (u, y, ac, x, subroutine
46 integer rowp(nshg*nnz), colm(nshg+1)
48 real*8 lhsK(9,nnz_tot), lhsP(4,nnz_tot)
50 real*8, allocatable, dimension(:,:,:,:) :: xKebe, xGoC
52 real*8 rerr(nshg,10)
54 real*8, allocatable :: tmpshp(:,:), tmpshgl(:,:,:)
55 real*8, allocatable :: tmpshpb(:,:), tmpshglb(:,:,:)
57 real*8 spmasstot(20), ebres(nshg)
|