File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
3104 |
PSI |
_RL PSI2(irun),TEMP(irun) |
./pkg/fizhi/fizhi_turb.F |
3296 |
PSI |
TEMP(I) = ARG1(I) + CM5 * ARG0(I) |
./pkg/fizhi/fizhi_turb.F |
3312 |
PSI |
PSI2(I) = TEMP(I) + CM6 * ARG1(I) |
./pkg/fizhi/fizhi_turb.F |
3341 |
PSI |
TEMP(I) = TEMP(I) + CM8 |
./pkg/fizhi/fizhi_turb.F |
3344 |
PSI |
PSI2(I) = TEMP(I) + ARG0(I) * ARG1(I) |
./pkg/fizhi/fizhi_turb.F |
4419 |
ZCSUB |
_RL AA(IRUN,5),TEMP(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4489 |
ZCSUB |
TEMP(I) = AA(I,1) / VUSTAR(I) |
./pkg/fizhi/fizhi_turb.F |
4490 |
ZCSUB |
VZSEA(I) = VZSEA(I) + TEMP(I) |
./pkg/fizhi/fizhi_turb.F |
4500 |
ZCSUB |
VDZSEA(I) = VDZSEA(I) * VUSTAR(I) - TEMP(I) |