File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
1423 |
TRBFLX |
_RL VX0PSIM(irun),VG(irun),VG0(irun),VR1MG0(irun) |
./pkg/fizhi/fizhi_turb.F |
1775 |
TRBFLX |
1 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX, |
./pkg/fizhi/fizhi_turb.F |
2329 |
SFCFLX |
3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX, |
./pkg/fizhi/fizhi_turb.F |
2392 |
SFCFLX |
_RL VX0PSIM(irun),VG(irun),VG0(irun),VR1MG0(irun) |
./pkg/fizhi/fizhi_turb.F |
2485 |
SFCFLX |
3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX, |
./pkg/fizhi/fizhi_turb.F |
2557 |
SFCFLX |
3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX, |
./pkg/fizhi/fizhi_turb.F |
2617 |
SFCFLX |
3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX, |
./pkg/fizhi/fizhi_turb.F |
4086 |
LINADJ |
3 VX0PSIM,VG,VG0,VR1MG0,VZ2,VDZSEA,VAZ0,VXNUM1,VPSIGB2,VDX, |
./pkg/fizhi/fizhi_turb.F |
4138 |
LINADJ |
_RL VX0PSIM(irun),VG(irun),VG0(irun),VR1MG0(irun) |
./pkg/fizhi/fizhi_turb.F |
4182 |
LINADJ |
VG(I) = 0. |
./pkg/fizhi/fizhi_turb.F |
4193 |
LINADJ |
VG(I) = VDZSEA(I) * VAZ0(I) |
./pkg/fizhi/fizhi_turb.F |
4194 |
LINADJ |
VG0(I) = VX0PSIM(I) * VG(I) |
./pkg/fizhi/fizhi_turb.F |
4231 |
LINADJ |
VXNUM3(I) = VXNUM3(I) + VG(I) * ( VY0(I) - VPSIGB2(I) ) |
./pkg/fizhi/fizhi_turb.F |
4315 |
LINADJ |
VZCOEF2(I) = VG(I) * VDXPSIM(I) |
./pkg/fizhi/fizhi_turb.F |
4323 |
LINADJ |
IF(IWATER(I).EQ.1) VZCOEF1(I) = VG(I) * VAWS1(I) |
./pkg/fizhi/fizhi_turb.F |
4377 |
LINADJ |
1 VDY(I) + VY0(I) * VG(I) * VDXPSIM(I) |
./pkg/fizhi/fizhi_turb.F |
4387 |
LINADJ |
1 VDZ0(I) = VDZ0(I) - VG(I) * VDXPSIM(I) * VDZETA1(I) |