Searched refs:impl (Results 1 – 20 of 20) sorted by relevance
| /phasta/phSolver/compressible/ |
| H A D | itrdrv.f | 163 if (mod(impl(1),100)/10 .eq. 1) then
180 if (mod(impl(1),100)/10 .eq. 2) then
186 if (mod(impl(1),100)/10 .eq. 3) then
448 if (impl(itseq) .eq. 0) then
450 & call error('itrdrv ','impl ',impl(itseq))
452 if (mod(impl(1),100)/10 .eq. 1) then ! sparse solve
489 else if (mod(impl(1),100)/10 .eq. 2) then ! mfg solve
507 else if (mod(impl(1),100)/10 .eq. 3) then ! ebe solve
|
| /phasta/phSolver/incompressible/ |
| H A D | itrPC.f | 36 if (impl(itseq) .eq. 3) then
38 impl(itseq) = 2
|
| H A D | elmgmr.f | 180 if (impl(1) .ne. 9 .and. lhs .eq. 1) then
306 if (impl(1) .ne. 9 .and. lhs .eq. 1) then
461 if ((impl(1)/10) .eq. 0) then ! no flow solve so flxID was not zeroed
493 if (impl(1) .ne. 9 .and. lhs .eq. 1) then
|
| H A D | rstatic.f | 63 if (impl(itseq) .ge. 9) then
|
| H A D | itrdrv.f | 1498 nsolt=mod(impl(1),2) ! 1 if solving temperature
1504 nsolflow=mod(impl(1),100)/10 ! 1 if solving flow
|
| /phasta/phSolver/common/ |
| H A D | input.f | 112 & write (iecho,1500) i, nstep(i), niter(i), impl(i),
246 & impl(mxats), rhoinf(mxats),
|
| H A D | genini.f | 144 itempr=mod(impl(1),2) ! tempr solve if impl odd
|
| H A D | input_fform.cc | 258 inpdat.impl[0] = 10*solflow+solscalr*100+solheat; in input_fform()
552 inpdat.impl[0] += 10*solflow;} in input_fform()
554 inpdat.impl[0] += 20*solflow;} in input_fform()
|
| H A D | common_c.h | 402 int impl[MAXTS]; member
|
| H A D | readnblk.f | 168 nsclr=impl(1)/100
|
| H A D | input.config | 101 # impl=10*logical(solflow)+nsclr*100 +
349 # impl ipvsq=2, P-Imp ipvsq=3
|
| H A D | common.h | 195 & impl(MAXTS), rhoinf(MAXTS),
|
| /phasta/M2N/include/ |
| H A D | commonM2N_c.h | 324 int impl[MAXTS]; member
|
| H A D | commonM2N.h | 149 & impl(MAXTS), rhoinf(MAXTS),
|
| /phasta/AcuStat/include/ |
| H A D | commonAcuStat_c.h | 324 int impl[MAXTS]; member
|
| H A D | commonAcuStat.h | 149 & impl(MAXTS), rhoinf(MAXTS),
|
| /phasta/M2NFixBnd/include/ |
| H A D | commonM2NFixBnd_c.h | 324 int impl[MAXTS]; member
|
| H A D | commonM2NFixBnd.h | 149 & impl(MAXTS), rhoinf(MAXTS),
|
| /phasta/M2NFixBnd/src/ |
| H A D | readnblk.f | 263 nsclr=impl(1)/100
|
| /phasta/M2N/src/ |
| H A D | readnblk.f | 282 nsclr=impl(1)/100
|