Home
last modified time | relevance | path

Searched refs:tmp4 (Results 1 – 8 of 8) sorted by relevance

/phasta/phSolver/incompressible/
H A Dftools.f336 real*8 tmp1, tmp2, tmp3, tmp4 local
386 tmp4 = 0
391 tmp4 = tmp4 + x(i,4) * y(i)
396 c(4) = tmp4
403 tmp4 = 0
409 tmp4 = tmp4 + x(i,4) * y(i)
415 c(4) = tmp4
423 tmp4 = 0
430 tmp4 = tmp4 + x(i,4) * y(i)
437 c(4) = tmp4
[all …]
H A DlesSparse.f425 real*8 tmp1, tmp2, tmp3, tmp4, pisave
443 tmp4 = 0
462 tmp4 = tmp4
475 q(i,4) = tmp4
H A Dfilters.f2209 call MPI_REDUCE (tmp2, tmp4, 1, MPI_DOUBLE_PRECISION,
2212 tmp2=tmp4
2961 call MPI_REDUCE (tmp2, tmp4, 1, MPI_DOUBLE_PRECISION,
2964 tmp2=tmp4
H A DadvLES.f3024 call MPI_REDUCE (tmp2, tmp4, 1, MPI_DOUBLE_PRECISION,
3027 tmp2=tmp4
3781 call MPI_REDUCE (tmp2, tmp4, 1, MPI_DOUBLE_PRECISION,
3784 tmp2=tmp4
/phasta/phSolver/compressible/
H A Dsparseap.f23 real*8 tmp1, tmp2, tmp3, tmp4, tmp5 local
53 tmp4 = 0.
74 tmp4 = tmp4 + lhsK(4 ,k)*p(j,1)
90 q(i,4) = q(i,4) + tmp4
/phasta/phSolver/common/
H A Dgetdmc.f368 call MPI_REDUCE (tmp2, tmp4, 1, MPI_DOUBLE_PRECISION,
371 tmp2=tmp4
H A Dbardmc.f534 call MPI_REDUCE (tmp2, tmp4, 1, MPI_DOUBLE_PRECISION,
537 tmp2=tmp4
/phasta/phSolver/AMG/
H A Dramg_coarse.f35 real(kind=8) :: tmp1,tmp2,tmp3,tmp4 local
326 tmp4 = 0
330 tmp4 = tmp4 + max(amg_la(k),zero)
340 if ( abs(tmp2).gt.1e-5) tmp2 = tmp4/tmp2