File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
1427 |
TRBFLX |
_RL VXNUM(irun),VDZETA1(irun),VDZETA2(irun) |
./pkg/fizhi/fizhi_turb.F |
1776 |
TRBFLX |
2 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2, |
./pkg/fizhi/fizhi_turb.F |
2330 |
SFCFLX |
4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2, |
./pkg/fizhi/fizhi_turb.F |
2396 |
SFCFLX |
_RL VXNUM(irun),VDZETA1(irun),VDZETA2(irun) |
./pkg/fizhi/fizhi_turb.F |
2486 |
SFCFLX |
4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2, |
./pkg/fizhi/fizhi_turb.F |
2558 |
SFCFLX |
4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2, |
./pkg/fizhi/fizhi_turb.F |
2618 |
SFCFLX |
4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2, |
./pkg/fizhi/fizhi_turb.F |
4087 |
LINADJ |
4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2, |
./pkg/fizhi/fizhi_turb.F |
4142 |
LINADJ |
_RL VXNUM(irun),VDZETA1(irun),VDZETA2(irun) |
./pkg/fizhi/fizhi_turb.F |
4270 |
LINADJ |
VDZETA1(I) = VDZETA(I) |
./pkg/fizhi/fizhi_turb.F |
4277 |
LINADJ |
VDZETA1(I) = VXNUM(I) |
./pkg/fizhi/fizhi_turb.F |
4295 |
LINADJ |
IF ( VINT1(I).EQ.1 ) VDZETA(I) = VDZETA1(I) |
./pkg/fizhi/fizhi_turb.F |
4300 |
LINADJ |
VDZETA2(I) = VDZETA(I) + VDZETA1(I) |
./pkg/fizhi/fizhi_turb.F |
4306 |
LINADJ |
IF(VINT1(I).EQ.1)VDZETA(I)=VXNUM1(I)*VRIB2(I) - 1. - VDZETA1(I) |
./pkg/fizhi/fizhi_turb.F |
4374 |
LINADJ |
VDZETA1(I) = 0. |
./pkg/fizhi/fizhi_turb.F |
4375 |
LINADJ |
IF(VINT1(I).EQ.1) VDZETA1(I) = VDPSIMC(I) / VDXPSIM(I) |
./pkg/fizhi/fizhi_turb.F |
4380 |
LINADJ |
IF ( VDZETA2(I).LT.VDZETA1(I) ) VDZETA1(I) = VDZETA2(I) |
./pkg/fizhi/fizhi_turb.F |
4383 |
LINADJ |
VDZETA(I) = VDZETA1(I) + VDZETA(I) |
./pkg/fizhi/fizhi_turb.F |
4384 |
LINADJ |
VDPSIM(I) = VDPSIM(I) + VDX(I) * VR1MG0(I) * VDZETA1(I) |
./pkg/fizhi/fizhi_turb.F |
4385 |
LINADJ |
VDPSIH(I) = VDPSIH(I) + VTEMPLIN(I) * VDZETA1(I) |
./pkg/fizhi/fizhi_turb.F |
4387 |
LINADJ |
1 VDZ0(I) = VDZ0(I) - VG(I) * VDXPSIM(I) * VDZETA1(I) |