Searched refs:PresBase (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/compressible/ |
| H A D | BCprofileKW.f | 2 subroutine BCprofileScaleKW(PresBase,VelBase,BC,yold) argument
6 real*8 PresBase, VelBase local
44 subroutine BCprofileInitKW(PresBase,VelBase,BC) argument
48 real*8 PresBase, VelBase local
62 PresBase=BC(kk,1)
|
| H A D | itrdrv.f | 310 call BCprofileInitKW(PresBase,VelBase,BC)
329 call BCprofileScaleKW(PresBase,VelBase,BC,yold)
|