Searched refs:yphbar (Results 1 – 3 of 3) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | itrdrv.f | 102 real*8, allocatable, dimension(:,:,:) :: yphbar local
194 allocate(yphbar(nshg,irank2yphbar,nphasesincycle)) ! more space for vorticity
197 allocate(yphbar(nshg,irank2yphbar,nphasesincycle))
199 yphbar = zero
632 & vorticity,yphbar,rerr,irank2ybar,irank2yphbar)
707 & nphasesincycle,yphbar(:,:,iphase),'d',nshg,15,lstep)
710 & nphasesincycle,yphbar(:,:,iphase),'d',nshg,11,lstep)
753 deallocate(yphbar)
1842 & vorticity,yphbar,rerr,irank2ybar,irank2yphbar) argument
1845 real*8 yphbar(nshg,irank2yphbar,nphasesincycle) local
[all …]
|
| /phasta/M2NFixBnd/src/ |
| H A D | readnblk.f | 20 real*8, allocatable :: yphbar(:,:,:) variable
452 allocate( yphbar(nshg,ndofyphbar,numphavg) )
453 yphbar(:,:,:) = -9.87654321e32
460 yphbar(1:nshg2,1:ndofyphbar,iphavg) =
470 deallocate(yphbar)
644 call commuMax (yphbar(:,:,iphavg), point2ilwork,
646 call commuMax (yphbar(:,:,iphavg), point2ilwork,
726 call mpi_allreduce(maxval(yphbar(:,idof,iphavg)), globmax,1,
728 call mpi_allreduce(minval(yphbar(:,idof,iphavg)), globmin,1,
807 & iphavg,numphavg,yphbar(:,:,iphavg),'d',
[all …]
|
| /phasta/M2N/src/ |
| H A D | readnblk.f | 20 real*8, allocatable :: yphbar(:,:,:) variable
466 allocate( yphbar(nshg,ndofyphbar,numphavg) )
473 yphbar(:,:,iphavg) = qread(:,:)
482 deallocate(yphbar)
878 & yphbar(i,idof,iphavg)
1003 & yphbar(i,idof,iphavg)
1217 deallocate(yphbar)
|