| /phasta/phSolver/incompressible/ |
| H A D | asigmr.f | 22 dimension y(nshg,ndofl), ac(nshg,ndofl), 30 dimension yl(npro,nshl,ndofl), acl(npro,nshl,ndofl), 58 call localy(y, yl, ien, ndofl, 'gather ') 59 call localy(ac, acl, ien, ndofl, 'gather ') 140 dimension y(nshg,ndofl), ac(nshg,ndofl), 147 real*8 yl(npro,nshl,ndofl), acl(npro,nshl,ndofl), 164 call localy(y, yl, ien, ndofl, 'gather ') 165 call localy(ac, acl, ien, ndofl, 'gather ')
|
| H A D | asbmfg.f | 19 dimension y(nshg,ndofl), x(numnp,nsd), 20 & ac(nshg,ndofl), u(nshg,nsd), 27 dimension yl(npro,nshl,ndofl), xlb(npro,nenl,nsd), 29 & ul(npro,nshl,nsd), acl(npro,nshl,ndofl) 42 call localy(y, yl, ienb, ndofl, 'gather ') 43 call localy(ac, acl, ienb, ndofl, 'gather ') 93 dimension y(nshg,ndofl), x(numnp,nsd), 100 dimension yl(npro,nshl,ndofl), xlb(npro,nenl,nsd), 112 call localy(y, yl, ienb, ndofl, 'gather ')
|
| H A D | asbflx.f | 18 dimension y(nshg,ndofl), x(numnp,nsd), 19 & ac(nshg,ndofl), u(nshg,nsd), 27 dimension yl(npro,nshl,ndofl), xlb(npro,nenl,nsd), 31 & ul(npro,nshl,nsd), acl(npro,nshl,ndofl) 49 call localy(y, yl, ienb, ndofl, 'gather ') 50 call localy(ac, acl, ienb, ndofl, 'gather ')
|
| H A D | timeseries.f | 7 dimension shape(nshl), ycl(npro,nshl,ndofl), 223 soln(1:ndofl) = zero 226 soln(1:ndofl) = soln(1:ndofl) 227 & +ycl(founde,i,1:ndofl)*shape(i) 230 soln(1:ndofl) = soln(1:ndofl) 231 & +ycl(founde,i,1:ndofl)*shape(i)*sgn(founde,i)
|
| H A D | elmgmr.f | 92 ndofl = lcblk(8,iblk) 150 ndofl = lcblk(8,iblk) 263 ndofl = lcblkb(8,iblk) 429 ndofl = lcblk(8,iblk) 473 ndofl = lcblk(8,iblk) 538 ndofl = lcblkb(8,iblk)
|
| H A D | elmStats.f | 27 ndofl = lcblk(8,iblk)
|
| /phasta/phSolver/compressible/ |
| H A D | asimfg.f | 17 dimension y(nshg,ndofl), ac(nshg,ndofl), 27 dimension ycl(npro,nshl,ndofl), acl(npro,nshl,ndofl), 49 call localy(y, ycl, ien, ndofl, 'gather ') 50 call localy(ac, acl, ien, ndofl, 'gather ')
|
| H A D | asbmfg.f | 15 dimension y(nshg,ndofl), x(numnp,nsd), 22 dimension ycl(npro,nshl,ndofl), xlb(npro,nenl,nsd), 39 call localy(y, ycl, ienb, ndofl, 'gather ') 82 dimension y(nshg,ndofl), x(numnp,nsd), 89 dimension ycl(npro,nshl,ndofl), xlb(npro,nenl,nsd), 102 call localy (y, ycl, ienb, ndofl, 'gather ')
|
| H A D | asigmr.f | 19 dimension y(nshg,ndofl), ac(nshg,ndofl), 29 dimension ycl(npro,nshl,ndofl), acl(npro,nshl,ndof), 52 call localy(y, ycl, ien, ndofl, 'gather ') 53 call localy(ac, acl, ien, ndofl, 'gather ')
|
| H A D | asires.f | 16 dimension y(nshg,nflow), yc(nshg,ndofl), 23 dimension yl(npro,nshl,nflow), ycl(npro,nshl,ndofl), 56 call localy(yc, ycl, ien, ndofl, 'gather ')
|
| H A D | timeseries.f | 7 dimension shape(nshl), ycl(npro,nshl,ndofl), 223 soln(1:ndofl) = zero 226 soln(1:ndofl) = soln(1:ndofl) 227 & +ycl(founde,i,1:ndofl)*shape(i) 230 soln(1:ndofl) = soln(1:ndofl) 231 & +ycl(founde,i,1:ndofl)*shape(i)*sgn(founde,i)
|
| H A D | elmgmr.f | 79 ndofl = lcblk(8,iblk) 139 ndofl = lcblk(8,iblk) 190 ndofl = lcblkb(8,iblk) 361 ndofl = lcblk(8,iblk) 420 ndofl = lcblk(8,iblk) 494 ndofl = lcblkb(8,iblk) 760 ndofl = lcblk(8,iblk) 819 ndofl = lcblkb(8,iblk)
|
| H A D | elmgmrpetsc.f | 93 ndofl = lcblk(8,iblk) 154 ndofl = lcblk(8,iblk) 226 ndofl = lcblkb(8,iblk) 381 ndofl = lcblk(8,iblk) 451 ndofl = lcblkb(8,iblk)
|
| H A D | elmmfg.f | 78 ndofl = lcblk(8,iblk) 137 ndofl = lcblk(8,iblk) 183 ndofl = lcblkb(8,iblk)
|
| H A D | itrres.f | 64 ndofl = lcblk(8,iblk) 117 ndofl = lcblkb(8,iblk)
|
| H A D | bflux.f | 207 ndofl = lcblk(8,iblk) 248 ndofl = lcblkb(8,iblk)
|
| H A D | asbflx.f | 46 call localy(y, ycl, ienb, ndofl, 'gather ')
|
| /phasta/phSolver/common/ |
| H A D | genblkPosix.f | 38 ndofl = ndof 68 lcblk(8,nelblk) = ndofl
|
| H A D | genblkSyncIO.f | 73 ndofl = ndof 111 lcblk(8,nelblk) = ndofl
|
| H A D | genblk.f | 77 ndofl = ndof 120 lcblk(8,nelblk) = ndofl
|
| H A D | genbkbPosix.f | 44 ndofl = ndof 120 lcblkb(8,nelblb) = ndofl
|
| H A D | genbkb.f | 82 ndofl = ndof 176 lcblkb(8,nelblb) = ndofl
|
| H A D | genbkbSyncIO.f | 81 ndofl = ndof 162 lcblkb(8,nelblb) = ndofl
|
| H A D | pvsqbi.f | 85 ndofl = lcblkb(8,iblk)
|
| H A D | settauw.f | 16 dimension y(nshg,ndofl), x(numnp,nsd), 131 ndofl = lcblkb(8,iblk)
|