| /phasta/phSolver/common/ |
| H A D | genblkPosix.f | 34 itpblk=nelblk
36 nelblk=0
58 nelblk=nelblk+1
61 lcblk(1,nelblk) = iel
63 lcblk(3,nelblk) = lcsyst
64 lcblk(4,nelblk) = ipordl
65 lcblk(5,nelblk) = nenl
66 lcblk(6,nelblk) = nfacel
67 lcblk(7,nelblk) = mattyp
68 lcblk(8,nelblk) = ndofl
[all …]
|
| H A D | genblk.f | 34 itpblk=nelblk
75 nelblk=0
112 nelblk=nelblk+1
114 lcblk(1,nelblk) = iel
115 lcblk(3,nelblk) = lcsyst
116 lcblk(4,nelblk) = ipordl
117 lcblk(5,nelblk) = nenl
118 lcblk(6,nelblk) = nfacel
119 lcblk(7,nelblk) = mattyp
120 lcblk(8,nelblk) = ndofl
[all …]
|
| H A D | genblkSyncIO.f | 34 itpblk=nelblk
71 nelblk=0
103 nelblk=nelblk+1
105 lcblk(1,nelblk) = iel
106 lcblk(3,nelblk) = lcsyst
107 lcblk(4,nelblk) = ipordl
108 lcblk(5,nelblk) = nenl
109 lcblk(6,nelblk) = nfacel
110 lcblk(7,nelblk) = mattyp
111 lcblk(8,nelblk) = ndofl
[all …]
|
| H A D | aveprep.f | 41 do iblk = 1,nelblk
317 do iblk = 1,nelblk
368 do iblk = 1,nelblk
409 do iblk = 1,nelblk
429 do iblk = 1,nelblk
|
| H A D | eqn_plane.f | 136 itmp = lcblk(1,nelblk+1)
139 do iblk=1,nelblk
|
| H A D | getdmc.f | 71 do iblk = 1,nelblk
90 do iblk = 1,nelblk
384 do iblk = 1,nelblk
|
| H A D | genadj.f | 16 do iblk = 1, nelblk
|
| H A D | filtprep.f | 137 do iblk = 1, nelblk
|
| H A D | errorsmooth.f | 29 do iblk = 1, nelblk
|
| H A D | gendat.f | 101 call genshp ( shp, shgl, nshape, nelblk)
|
| /phasta/phSolver/compressible/ |
| H A D | au1gmr.f | 51 do iblk = 1, nelblk
151 do iblk = 1, nelblk
|
| H A D | i3pcond.f | 36 do iblk = 1, nelblk
|
| H A D | elmgmr.f | 67 do iblk = 1, nelblk
126 do iblk = 1, nelblk
350 do iblk = 1, nelblk
407 do iblk = 1, nelblk
749 do iblk = 1, nelblk
|
| H A D | elmmfg.f | 65 do iblk = 1, nelblk
125 do iblk = 1, nelblk
|
| H A D | elmgmrpetsc.f | 81 do iblk = 1, nelblk
141 do iblk = 1, nelblk
371 do iblk = 1, nelblk
|
| H A D | i3pre.f | 43 do iblk = 1, nelblk
185 do iblk = 1, nelblk
|
| H A D | vorticity.f | 23 do iblk = 1, nelblk
45 write(*,*)'Compute vortIntG:', real(iblk)/nelblk
|
| H A D | itrres.f | 46 do iblk = 1, nelblk
|
| H A D | timeseries.f | 216 if(iblkts.eq.nelblk) then !not found in last elm-blk of this part
217 statptts(jj,1)=nelblk+1 ! not searched for following steps
|
| /phasta/phSolver/incompressible/ |
| H A D | elmgmr.f | 84 do iblk = 1, nelblk
140 do iblk = 1, nelblk
423 do iblk = 1, nelblk
467 do iblk = 1, nelblk
|
| H A D | advLES.f | 566 do iblk = 1,nelblk
674 do iblk = 1,nelblk
816 do iblk = 1,nelblk
991 do iblk = 1,nelblk
1049 do iblk = 1,nelblk
1100 do iblk = 1,nelblk
1362 do iblk = 1,nelblk
1379 do iblk = 1,nelblk
1403 do iblk = 1, nelblk
1442 do iblk = 1,nelblk
[all …]
|
| H A D | elmStats.f | 22 do iblk = 1, nelblk
|
| H A D | timeseries.f | 216 if(iblkts.eq.nelblk) then !not found in last elm-blk of this part
217 statptts(jj,1)=nelblk+1 ! not searched for following steps
|
| H A D | errsmooth.f | 30 do iblk = 1, nelblk
|
| H A D | hessian.f | 27 do iblk = 1, nelblk
56 do iblk = 1, nelblk
|