| /phasta/phSolver/common/ |
| H A D | pvsqbi.f | 51 real*8, allocatable :: tmpshpb(:,:) local
101 allocate (tmpshpb(nshl,MAXQPT))
103 tmpshpb(1:nshl,:) = shpb(lcsyst,1:nshl,:)
106 & tmpshpb,
111 & tmpshpb,
115 deallocate (tmpshpb)
|
| H A D | errorsmooth.f | 20 real*8, allocatable :: tmpshpb(:,:), tmpshglb(:,:,:) local
|
| H A D | solvecon.f | 31 real*8, allocatable :: tmpshpb(:,:), tmpshglb(:,:,:) local
|
| /phasta/phSolver/compressible/ |
| H A D | itrres.f | 33 real*8, allocatable :: tmpshpb(:,:), tmpshglb(:,:,:) local
124 allocate (tmpshpb(nshl,MAXQPT))
127 tmpshpb(1:nshl,:) = shpb(lcsyst,1:nshl,:)
135 & tmpshpb, tmpshglb,
141 deallocate (tmpshpb)
|
| H A D | elmgmr.f | 43 real*8, allocatable :: tmpshpb(:,:), tmpshglb(:,:,:) local
202 allocate (tmpshpb(nshl,MAXQPT))
205 tmpshpb(1:nshl,:) = shpb(lcsyst,1:nshl,:)
209 & tmpshpb, tmpshglb,
214 deallocate (tmpshpb)
326 real*8, allocatable :: tmpshpb(:,:), tmpshglb(:,:,:) local
506 allocate (tmpshpb(nshl,MAXQPT))
515 tmpshpb(1:nshl,:) = shpb(lcsyst,1:nshl,:)
519 & tmpshpb, tmpshglb,
530 deallocate (tmpshpb)
[all …]
|
| H A D | elmgmrpetsc.f | 53 real*8, allocatable :: tmpshpb(:,:), tmpshglb(:,:,:) local
238 allocate (tmpshpb(nshl,MAXQPT))
241 tmpshpb(1:nshl,:) = shpb(lcsyst,1:nshl,:)
245 & tmpshpb, tmpshglb,
250 deallocate (tmpshpb)
342 real*8, allocatable :: tmpshpb(:,:), tmpshglb(:,:,:) local
462 allocate (tmpshpb(nshl,MAXQPT))
465 tmpshpb(1:nshl,:) = shpb(lcsyst,1:nshl,:)
469 & tmpshpb,
475 deallocate ( tmpshpb )
|
| H A D | elmmfg.f | 41 real*8, allocatable :: tmpshpb(:,:), tmpshglb(:,:,:) local
194 allocate (tmpshpb(nshl,MAXQPT))
197 tmpshpb(1:nshl,:) = shpb(lcsyst,1:nshl,:)
201 & tmpshpb, tmpshglb,
206 deallocate (tmpshpb)
|
| /phasta/phSolver/incompressible/ |
| H A D | elmgmr.f | 55 real*8, allocatable :: tmpshpb(:,:), tmpshglb(:,:,:) local
284 allocate (tmpshpb(nshl,MAXQPT))
287 tmpshpb(1:nshl,:) = shpb(lcsyst,1:nshl,:)
292 & tmpshpb,
317 deallocate (tmpshpb)
|
| H A D | errsmooth.f | 21 real*8, allocatable :: tmpshpb(:,:), tmpshglb(:,:,:) local
|