| /phasta/phSolver/compressible/ |
| H A D | rstat.f | 41 call MPI_ALLREDUCE (flxID(2,isrfIM), spmasss,1,
43 call MPI_ALLREDUCE (flxID(1,isrfIM), Atots,1,
45 call MPI_ALLREDUCE (flxID(3,:), Ftots(1,:),MAXSURF+1,
47 call MPI_ALLREDUCE (flxID(4,:), Ftots(2,:),MAXSURF+1,
49 call MPI_ALLREDUCE (flxID(5,:), Ftots(3,:),MAXSURF+1,
51 call MPI_ALLREDUCE (flxID(2,:), spmasstot(:),MAXSURF+1,
54 Ftots=flxID(3:5,:)
55 Atots=flxID(1,isrfIM)
56 spmasss=flxID(2,isrfIM)
57 spmasstot(:)=flxID(2,:)
[all …]
|
| H A D | e3b.f | 333 flxID(1,iface) = flxID(1,iface) + WdetJb(iel)! measure area too
335 flxID(2,iface) = flxID(2,iface) - WdetJb(iel) * rou(iel)
336 flxID(3,iface) = flxID(3,iface)
339 flxID(4,iface) = flxID(4,iface)
342 flxID(5,iface) = flxID(5,iface)
|
| H A D | elmgmr.f | 121 flxID = zero
403 flxID = zero
|
| H A D | elmgmrpetsc.f | 134 flxID = zero
|
| /phasta/phSolver/incompressible/ |
| H A D | forces.f | 71 call MPI_ALLREDUCE (flxID(1,isrfIM), Atots,1,
74 call MPI_ALLREDUCE (flxID(2,isrfIM), spmasss,1,
77 call MPI_ALLREDUCE (flxID(3,:), Ftots(1,:),MAXSURF+1,
80 call MPI_ALLREDUCE (flxID(4,:), Ftots(2,:),MAXSURF+1,
83 call MPI_ALLREDUCE (flxID(5,:), Ftots(3,:),MAXSURF+1,
86 Ftots=flxID(3:5,:)
87 Atots=flxID(1,isrfIM)
88 spmasss=flxID(2,isrfIM)
238 SFlux(:) = flxID(:,isrf) ! Area, Mass Flux, Force 1, Force 2, Force 3, Scalars
|
| H A D | e3b.f | 154 flxID(1,iface) = flxID(1,iface) + WdetJb(iel)! measure area too
155 flxID(2,iface) = flxID(2,iface) - WdetJb(iel) * unm(iel)
156 flxID(3,iface) = flxID(3,iface)
159 flxID(4,iface) = flxID(4,iface)
162 flxID(5,iface) = flxID(5,iface)
436 flxID(ibb,iface) = flxID(ibb,iface)
|
| H A D | elmgmr.f | 130 flxID = zero
462 flxID = zero
|
| /phasta/AcuStat/include/ |
| H A D | commonAcuStat_c.h | 176 double flxID[MAXSURF+1][10] ; member
|
| H A D | commonAcuStat.h | 91 c flxID(numfluxes,nIDs+1)
95 common /aerfrc/ flxID(10,0:MAXSURF), Force(3),HFlux,
|
| /phasta/phSolver/common/ |
| H A D | input.f | 220 write (23,*) flxID(10,20), Force(3),HFlux, nsrflist(0:20)
|
| H A D | common.h | 102 c flxID(numfluxes,nIDs+1)
106 common /aerfrc/ flxID(10,0:MAXSURF), Force(3),HFlux,
|
| H A D | common_c.h | 219 double flxID[MAXSURF+1][10] ; member
|
| /phasta/M2N/include/ |
| H A D | commonM2N_c.h | 176 double flxID[MAXSURF+1][10] ; member
|
| H A D | commonM2N.h | 91 c flxID(numfluxes,nIDs+1)
95 common /aerfrc/ flxID(10,0:MAXSURF), Force(3),HFlux,
|
| /phasta/M2NFixBnd/include/ |
| H A D | commonM2NFixBnd_c.h | 176 double flxID[MAXSURF+1][10] ; member
|
| H A D | commonM2NFixBnd.h | 91 c flxID(numfluxes,nIDs+1)
95 common /aerfrc/ flxID(10,0:MAXSURF), Force(3),HFlux,
|