Searched refs:vmax (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | blowerControl.f90 | 33 real*8 :: vmax, vmin !maximum, minimum blower velocity component
48 & vmax, vmin, argument
57 & vmax( nBlowers), vmin( nBlowers), local
75 blower(i)%vmax = vmax(i)
101 real*8 :: t0, t1, t2, t3, t4, vmax, vmin local
114 vmax = blower(iBlower)%vmax
137 vmagref = (vmax - vmin)*(t - t0)/(t1 - t0) + vmin
139 vmagref = vmax
141 vmagref = (vmax - vmin)*(t - t3)/(t2 - t3) + vmin
155 vmagref = 0.5*(vmax - vmin)*sin(2*pi*t) + 0.5*(vmax + vmin)
[all …]
|
| /phasta/phSolver/AMG/ |
| H A D | ramg_tools.f | 1011 real(kind=8) :: v,vave,vmax local
1014 call MPI_AllReduce(v,vmax,1,
1021 vmax = v
1025 write(*,7101)trim(str),vave,vmax
|