Searched refs:d0 (Results 1 – 16 of 16) sorted by relevance
| /phasta/phSolver/compressible/ |
| H A D | gtminv.f | 30 rminv(2,7) = 0.d0 31 rminv(2,8) = 0.d0 48 rminv(4,5) = 0.d0 49 rminv(4,6) = 0.d0 50 rminv(4,7) = 0.d0 118 rminv(1,1) = 2400.d0 119 rminv(1,2) = -120.d0 120 rminv(1,3) = -120.d0 121 rminv(1,4) = -120.d0 122 rminv(1,5) = 2520.d0 [all …]
|
| H A D | rstat.f | 110 jtotrs(1) = int ( 10.d0 * log10 ( totres(1) / resfrt(1) ) ) 111 jtotrs(2) = int ( 10.d0 * log10 ( totres(2) / resfrt(2) ) ) 225 jtotrs = int ( 10.d0 * log10 ( totres / resfrts ) ) 226 jresmx = int ( 10.d0 * log10 ( resmax / totres ) ) 341 jtotrs = int ( 10.d0 * log10 ( totres / resfrt(1) ) ) 345 jtotrsP = int ( 10.d0 * log10 ( totresP / resfrt(2) ) ) 416 jtotrs = int ( 10.d0 * log10 ( totres / resfrts ) ) 417 jresmx = int ( 10.d0 * log10 ( resmax / totres ) )
|
| H A D | e3q.f | 58 alph1 = 0.d0 59 alph2 = 0.d0
|
| H A D | timer.f | 115 ratio(i) = 100.d0 * cpu(i) / cpu(icd)
|
| H A D | e3ql.f | 176 qrl = qrl/6.d0
|
| /phasta/phSolver/incompressible/ |
| H A D | BCprofile.f | 30 offphase = 0.d0 33 offphase = 1.d0 38 offphase = 1.d0 40 offphase = 0.d0 46 offphase = 1.d0 48 offphase = 0.d0 55 offphase = 1.d0 57 offphase = 0.d0 92 vbc_prof(kk,1)=0.d0 95 vbc_prof(kk,3)=0.d0
|
| H A D | e3q.f | 54 alph1 = 0.d0 55 alph2 = 0.d0 240 alph1 = 0.d0 241 alph2 = 0.d0
|
| H A D | stats.f | 95 & d0, d1, d2, c0, c1, c2, c3, c4, c5 local 153 d0 = 1. / ( reg + r0 ) 156 stsDInv(i,1) = d0 162 c0 = r0 + r1 - r3 * r3 * (d0 + d1) + reg 164 c2 = r2 + r0 - r5 * r5 * (d2 + d0) + reg 167 c5 = r4 - r5 * r3 * d0
|
| H A D | rstatic.f | 160 jtotrs = int ( 10.d0 * log10 ( totres / resfrt(1) ) ) 161 jresmx = int ( 10.d0 * log10 ( resmax / totres ) )
|
| H A D | e3sts.f | 89 fct = 1.d0 / 6.d0 151 fct = 1.d0 / 6.d0 238 fct = 1.d0 / 6.d0 361 fct = 1.d0 / 12.d0
|
| H A D | e3ql.f | 269 qrl = qrl/6.d0
|
| /phasta/AcuStat/src/ |
| H A D | readnblk.f | 230 allocate( qybarcumul(nshg2,ndofybar) ) ; qybarcumul = 0.d0 233 allocate( qread(nshg2,ndofybar) ) ; qread = 0.d0 264 allocate( qerrorcumul(nshg2,ndoferrors) ) ; qerrorcumul = 0.d0 267 allocate( qread(nshg2,ndoferrors) ) ; qread = 0.d0 313 qyphbarcumul = 0.d0 316 allocate( qread(nshg2,ndofyphbar) ) ; qread = 0.d0 351 allocate( qread(nshg2,ndof2) ) ; qread = 0.d0 378 allocate( qread(nshg2,ndofvort) ) ; qread = 0.d0 405 allocate( qread1(nshg2) ) ; qread1 = 0.d0
|
| /phasta/phSolver/common/ |
| H A D | elm3keps.f | 389 srcJac(e,1) = max( srcJac(e,1), srcRat(e,1), 0.d0 ) 390 srcJac(e,4) = max( srcJac(e,4), srcRat(e,2), 0.d0 )
|
| /phasta/phSolver/incompressible/e3source/ |
| H A D | e3source.fimplicit | 22 bigR = 0.5d0 39 c$$$ e1 = one/sqrt(3.0d0) ! axis of rotation 338 tanharg=tanh(8.0000000000000000d0*rd)**3 383 r = min( max(r, -8.0d0), 8.0d0) 396 if(abs(r).gt.7.0d0) fwp=zero
|
| H A D | e3source.fRHSonly | 22 bigR = 0.5d0 39 c$$$ e1 = one/sqrt(3.0d0) ! axis of rotation 335 fd=one-tanh((8.0000000000000000d0*rd)**3) 369 r = min( max(r, -8.0d0), 8.0d0) 382 if(abs(r).gt.7.0d0) fwp=zero
|
| /phasta/M2N/src/ |
| H A D | readnblk.f | 469 allocate( qread(nshg,ndofyphbar) ) ; qread = 0.d0
|