Searched refs:nBlowers (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | blowerControl.f90 | 44 subroutine BC_setVars(nBlowers, blowerMode, argument
52 integer :: nBlowers local
53 integer :: blowerMode(nBlowers),
54 & surfID( nBlowers), enable( nBlowers)
55 real*8 :: t_cycle( nBlowers), t_fullOn( nBlowers),
56 & t_riseTime(nBlowers), t_fallTime( nBlowers),
57 & vmax( nBlowers), vmin( nBlowers),
58 & T( nBlowers), nu( nblowers),
59 & deltaBL( nBlowers), deltaBLsclr(nBlowers)
61 nBlower = nBlowers
|