| /phasta/phSolver/common/ |
| H A D | qpbc.f | 15 dimension rmass(nshg), qres(nshg,idflx),
20 do i=1,idflx/nsd
37 call commu (qres , ilwork, idflx , 'in ')
68 do i=1, idflx
90 call commu (qres, ilwork, idflx, 'out')
97 do i=1,idflx/nsd
|
| H A D | solvecon.f | 162 & qres(nshg,idflx), rmass(nshg)
|
| H A D | common_c.h | 385 int idflx; member
|
| /phasta/phSolver/compressible/ |
| H A D | asiq.f | 30 & qres(nshg,idflx), rmass(nshg)
35 & ql(npro,nshl,idflx), rmassl(npro,nshl),
65 call local (qres, ql, ien, idflx,'scatter ')
|
| H A D | asimfg.f | 24 & qres(nshg,idflx)
31 & ql(npro,nshl,idflx)
54 & call local (qres, ql, ien, idflx, 'gather ')
|
| H A D | solmfg.f | 67 idflx = zero
68 if(idiff >= 1) idflx= idflx + (nflow-1) * nsd
69 if (isurf == 1) idflx=idflx + nsd
|
| H A D | solgmr.f | 70 idflx = 0
71 if(idiff >= 1) idflx= idflx + (nflow-1) * nsd
72 if (isurf == 1) idflx=idflx + nsd
442 idflx = 0
443 if(idiff >= 1) idflx= idflx + (nflow-1) * nsd
444 if (isurf == 1) idflx=idflx + nsd
|
| H A D | solgmrpetsc.c | 227 genpar.idflx = 0 ; in SolGMRp()
228 if(genpar.idiff >= 1) genpar.idflx= genpar.idflx + (nflow-1) * nsd; in SolGMRp()
229 if (genpar.isurf == 1) genpar.idflx=genpar.idflx + nsd; in SolGMRp()
473 genpar.idflx = 0 ; in SolGMRpSclr()
474 if(genpar.idiff >= 1) genpar.idflx= genpar.idflx + (nflow-1) * nsd; in SolGMRpSclr()
475 if (genpar.isurf == 1) genpar.idflx=genpar.idflx + nsd; in SolGMRpSclr()
|
| H A D | asigmr.f | 26 & qres(nshg,idflx)
33 & ql(npro,nshl,idflx)
55 call local (qres, ql, ien, idflx, 'gather ')
|
| H A D | e3q.f | 28 & ql(npro,nshl,idflx), rmassl(npro,nshl),
42 dimension qdi(npro,idflx),alph1(npro),alph2(npro)
|
| H A D | e3ivar.f | 79 & ql(npro,nshl,idflx),
401 & + shg(:,n,1)*ql(:,n,idflx-2)
402 & + shg(:,n,2)*ql(:,n,idflx-1)
403 & + shg(:,n,3)*ql(:,n,idflx)
|
| H A D | elmmfg.f | 34 dimension qres(nshg,idflx), rmass(nshg),
|
| H A D | e3ql.f | 28 & ql(npro,nshl,idflx), xmudmi(npro,ngauss)
|
| H A D | elmgmr.f | 36 dimension qres(nshg, idflx), rmass(nshg)
319 dimension qres(nshg, idflx), rmass(nshg)
|
| H A D | elmgmrpetsc.f | 46 dimension qres(nshg, idflx), rmass(nshg)
|
| /phasta/phSolver/incompressible/ |
| H A D | asiq.f | 30 & qres(nshg,idflx), rmass(nshg)
33 & ql(npro,nshl,idflx), rmassl(npro,nshl),
71 call local (qres, ql, ien, idflx, 'scatter ')
|
| H A D | asigmr.f | 27 & qres(nshg,idflx)
33 & ql(npro,nshl,idflx)
61 call local (qres, ql, ien, idflx, 'gather ')
|
| H A D | solfar.f | 129 idflx = 0
130 if(idiff >= 1 ) idflx= (nflow-1) * nsd
131 if (isurf == 1) idflx=nflow*nsd
|
| H A D | e3ivar.f | 65 & ql(npro,nshl,idflx), rLui(npro,nsd),
197 & + shg(:,n,1)*ql(:,n,idflx-2)
198 & + shg(:,n,2)*ql(:,n,idflx-1)
199 & + shg(:,n,3)*ql(:,n,idflx)
|
| H A D | e3q.f | 27 & ql(npro,nshl,idflx), rmassl(npro,nshl),
37 dimension qdi(npro,idflx),alph1(npro),alph2(npro)
|
| H A D | e3.f | 44 & rl(npro,nshl,nflow), ql(npro,nshl,idflx)
|
| H A D | e3ql.f | 28 & ql(npro,nshl,idflx), xmudmi(npro,ngauss)
|
| /phasta/M2N/include/ |
| H A D | commonM2N_c.h | 308 int idflx; member
|
| /phasta/AcuStat/include/ |
| H A D | commonAcuStat_c.h | 308 int idflx; member
|
| /phasta/M2NFixBnd/include/ |
| H A D | commonM2NFixBnd_c.h | 308 int idflx; member
|