| /phasta/phSolver/compressible/ |
| H A D | elmgmr.f | 42 real*8, allocatable :: tmpshp(:,:), tmpshgl(:,:,:) local 88 allocate (tmpshgl(nsd,nshl,MAXQPT)) 91 tmpshgl(:,1:nshl,:) = shgl(lcsyst,:,1:nshl,:) 95 & tmpshgl, 101 deallocate ( tmpshgl ) 149 allocate (tmpshgl(nsd,nshl,MAXQPT)) 152 tmpshgl(:,1:nshl,:) = shgl(lcsyst,:,1:nshl,:) 157 & tmpshgl, mien(iblk)%p, 169 deallocate ( tmpshgl ) 325 real*8, allocatable :: tmpshp(:,:), tmpshgl(:,:,:) local [all …]
|
| H A D | elmgmrpetsc.f | 52 real*8, allocatable :: tmpshp(:,:), tmpshgl(:,:,:) local 102 allocate (tmpshgl(nsd,nshl,MAXQPT)) 105 tmpshgl(:,1:nshl,:) = shgl(lcsyst,:,1:nshl,:) 109 & tmpshgl, 115 deallocate ( tmpshgl ) 171 allocate (tmpshgl(nsd,nshl,MAXQPT)) 173 tmpshgl(:,1:nshl,:) = shgl(lcsyst,:,1:nshl,:) 178 & tmpshgl, mien(iblk)%p, 201 deallocate ( tmpshgl ) 341 real*8, allocatable :: tmpshp(:,:), tmpshgl(:,:,:) local [all …]
|
| H A D | elmmfg.f | 40 real*8, allocatable :: tmpshp(:,:), tmpshgl(:,:,:) local 87 allocate (tmpshgl(nsd,nshl,MAXQPT)) 90 tmpshgl(:,1:nshl,:) = shgl(lcsyst,:,1:nshl,:) 95 & tmpshgl, 101 deallocate (tmpshgl) 146 allocate (tmpshgl(nsd,nshl,MAXQPT)) 149 tmpshgl(:,1:nshl,:) = shgl(lcsyst,:,1:nshl,:) 153 & tmpshp, tmpshgl, 160 deallocate (tmpshgl)
|
| H A D | itrres.f | 32 real*8, allocatable :: tmpshp(:,:), tmpshgl(:,:,:) local 73 allocate (tmpshgl(nsd,nshl,MAXQPT)) 76 tmpshgl(:,1:nshl,:) = shgl(lcsyst,:,1:nshl,:) 80 & tmpshp, tmpshgl, 85 deallocate (tmpshgl)
|
| H A D | vorticity.f | 13 real*8, allocatable :: tmpshp(:,:), tmpshgl(:,:,:) local 39 allocate (tmpshgl(nsd,nshl,MAXQPT)) 41 tmpshgl(:,1:nshl,:) = shgl(lcsyst,:,1:nshl,:) 48 call vortELE(y,x,tmpshp,tmpshgl,mien(iblk)%p,vortIntG,lpmassG) 51 deallocate(tmpshgl)
|
| /phasta/phSolver/common/ |
| H A D | errorsmooth.f | 19 real*8, allocatable :: tmpshp(:,:), tmpshgl(:,:,:) local 50 allocate (tmpshgl(nsd,nshl,MAXQPT)) 53 tmpshgl(:,1:nshl,:) = shgl(lcsyst,:,1:nshl,:) 57 & tmpshgl, 63 deallocate ( tmpshgl )
|
| H A D | solvecon.f | 30 real*8, allocatable :: tmpshp(:,:), tmpshgl(:,:,:) local 65 allocate (tmpshgl(nsd,nshl,MAXQPT)) 68 tmpshgl(:,1:nshl,:) = shgl(lcsyst,:,1:nshl,:) 71 & tmpshgl, mien(iblk)%p, rmass, 75 deallocate ( tmpshgl )
|
| /phasta/phSolver/incompressible/ |
| H A D | errsmooth.f | 20 real*8, allocatable :: tmpshp(:,:), tmpshgl(:,:,:) local 51 allocate (tmpshgl(nsd,nshl,MAXQPT)) 54 tmpshgl(:,1:nshl,:) = shgl(lcsyst,:,1:nshl,:) 58 & tmpshgl, 64 deallocate ( tmpshgl )
|
| H A D | genlmass.f | 13 real*8, allocatable :: tmpshp(:,:), tmpshgl(:,:,:) local 41 allocate (tmpshgl(nsd,nshl,MAXQPT)) 43 tmpshgl(:,1:nshl,:) = shgl(lcsyst,:,1:nshl,:) 47 & tmpshgl, mien(iblk)%p, 51 deallocate ( tmpshgl )
|
| H A D | elmgmr.f | 54 real*8, allocatable :: tmpshp(:,:), tmpshgl(:,:,:) local 164 allocate (tmpshgl(nsd,nshl,MAXQPT)) 167 tmpshgl(:,1:nshl,:) = shgl(lcsyst,:,1:nshl,:) 172 & tmpshgl, 192 deallocate ( tmpshgl )
|