Searched refs:nsize (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_ggb.f | 42 integer :: p,q,nsize,step,asize,gsize local
56 call ramg_generate_gmap(ilwork,asize,nsize,gmap,grevmap,1)
58 call MPI_AllReduce(nsize,gsize,1,MPI_INTEGER,MPI_MAX,
92 allocate(tramg_ev(nsize,maxncv))
104 & ido,bmat,nsize,which,nev,tol,resid,ncv,
106 & nsize,iparam,ipntr,workd,workl,lworkl,
110 & asize,nsize,gmap,grevmap,
114 & ido,bmat,nsize,which,nev,tol,resid,ncv,
116 & nsize,iparam,ipntr,workd,workl,lworkl,
127 & tramg_ev,nsize,
[all …]
|
| H A D | ramg_mls.f | 59 integer :: p,q,nsize,step,asize,gsize local
68 call ramg_generate_gmap(ilwork,asize,nsize,gmap,grevmap,level)
70 call MPI_AllReduce(nsize,gsize,1,MPI_INTEGER,MPI_MAX,
116 allocate(tramg_ev(nsize,maxncv))
123 & ido,bmat,nsize,which,nev,tol,resid,ncv,
125 & nsize,iparam,ipntr,workd,workl,lworkl,
128 call ramg_ggb_G2A(twork1,workd(ipntr(1)),asize,nsize,1,
143 call ramg_ggb_A2G(twork2,workd(ipntr(2)),asize,nsize,1,
146 & ido,bmat,nsize,which,nev,tol,resid,ncv,
148 & nsize,iparam,ipntr,workd,workl,lworkl,
[all …]
|