File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
1417 |
TRBFLX |
_RL VDZ0(irun),VDPSIM(irun) |
./pkg/fizhi/fizhi_turb.F |
1772 |
TRBFLX |
4 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
./pkg/fizhi/fizhi_turb.F |
2326 |
SFCFLX |
7 VHZ,VPSIM,VAPSIM,VPSIG,VPSIHG,VTEMP,VDZETA,VDZ0,VDPSIM, |
./pkg/fizhi/fizhi_turb.F |
2388 |
SFCFLX |
_RL VTEMP(irun),VDZETA(irun),VDZ0(irun),VDPSIM(irun) |
./pkg/fizhi/fizhi_turb.F |
2483 |
SFCFLX |
5 VDZ0,VDPSIM,VDPSIH, |
./pkg/fizhi/fizhi_turb.F |
2491 |
SFCFLX |
VZ0(I) = VZ0(I) + VDZ0(I) |
./pkg/fizhi/fizhi_turb.F |
2555 |
SFCFLX |
5 VDZ0,VDPSIM,VDPSIH, |
./pkg/fizhi/fizhi_turb.F |
2570 |
SFCFLX |
VZ0(I) = VZ0(I) + VZ0L(I) * VDZ0(I) |
./pkg/fizhi/fizhi_turb.F |
2615 |
SFCFLX |
5 VDZ0,VDPSIM,VDPSIH, |
./pkg/fizhi/fizhi_turb.F |
2639 |
SFCFLX |
VZ0(I) = VZ0(I) * ( 1. + VDZ0(I) ) |
./pkg/fizhi/fizhi_turb.F |
4085 |
LINADJ |
2 VDZETA,VDZ0,VDPSIM,VDPSIH,INTRIB, |
./pkg/fizhi/fizhi_turb.F |
4135 |
LINADJ |
_RL VDZETA(IRUN),VDZ0(IRUN),VDPSIM(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4181 |
LINADJ |
VDZ0(I) = 0. |
./pkg/fizhi/fizhi_turb.F |
4196 |
LINADJ |
VDZ0(I) = ( VZ2(I) - VZ1(I) ) * VR1MG0(I) |
./pkg/fizhi/fizhi_turb.F |
4204 |
LINADJ |
IF (IWATER(I).EQ.1) VDZ0(I) = VDZ0(I) * VAZ0(I) |
./pkg/fizhi/fizhi_turb.F |
4234 |
LINADJ |
VXNUM2(I) = VXNUM2(I) * VDZ0(I) |
./pkg/fizhi/fizhi_turb.F |
4316 |
LINADJ |
VDZ0(I) = VDZ0(I) - VZCOEF2(I) * VDZETA(I) |
./pkg/fizhi/fizhi_turb.F |
4329 |
LINADJ |
IF (IWATER(I).EQ.1) VDZ0(I) = |
./pkg/fizhi/fizhi_turb.F |
4339 |
LINADJ |
VDPSIM(I) = - VDZ0(I) * VAZ0(I) |
./pkg/fizhi/fizhi_turb.F |
4351 |
LINADJ |
VDPSIM(I) = VDPSIM(I) - VX0(I) * VDZ0(I) |
./pkg/fizhi/fizhi_turb.F |
4352 |
LINADJ |
VDPSIH(I) = VDPSIH(I) - VY0(I) * VDZ0(I) |
./pkg/fizhi/fizhi_turb.F |
4387 |
LINADJ |
1 VDZ0(I) = VDZ0(I) - VG(I) * VDXPSIM(I) * VDZETA1(I) |