| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1597 |
TRBFLX |
_RL VXNUM(irun),VDZETA1(irun),VDZETA2(irun) |
|
./pkg/fizhi/fizhi_turb.F |
2028 |
TRBFLX |
2 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2, |
|
./pkg/fizhi/fizhi_turb.F |
2779 |
SFCFLX |
4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2, |
|
./pkg/fizhi/fizhi_turb.F |
2848 |
SFCFLX |
_RL VXNUM(irun),VDZETA1(irun),VDZETA2(irun) |
|
./pkg/fizhi/fizhi_turb.F |
2938 |
SFCFLX |
4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2, |
|
./pkg/fizhi/fizhi_turb.F |
3010 |
SFCFLX |
4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2, |
|
./pkg/fizhi/fizhi_turb.F |
3070 |
SFCFLX |
4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2, |
|
./pkg/fizhi/fizhi_turb.F |
4652 |
LINADJ |
4 VDXPSIM,VDY,VXNUM2,VDEN,VAWS1,VXNUM3,VXNUM,VDZETA1,VDZETA2, |
|
./pkg/fizhi/fizhi_turb.F |
4711 |
LINADJ |
_RL VXNUM(irun),VDZETA1(irun),VDZETA2(irun) |
|
./pkg/fizhi/fizhi_turb.F |
4831 |
LINADJ |
VXNUM(I) = VRIB2(I) - VRIB1(I) |
|
./pkg/fizhi/fizhi_turb.F |
4832 |
LINADJ |
IF( (VX0(I).GT.XX0MAX).AND.(VXNUM(I).GE.0.) )VXNUM(I) = 0. |
|
./pkg/fizhi/fizhi_turb.F |
4833 |
LINADJ |
VXNUM(I) = VXNUM1(I) * VXNUM(I) |
|
./pkg/fizhi/fizhi_turb.F |
4840 |
LINADJ |
VXNUM(I) = VXNUM(I) + VXNUM3(I) * ( VWS2(I) - VWS1(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
4846 |
LINADJ |
VDZETA1(I) = VXNUM(I) |
|
./pkg/fizhi/fizhi_turb.F |
4847 |
LINADJ |
IF(LWATER.AND.(IWATER(I).EQ.1)) VXNUM(I) = VXNUM(I) + VXNUM2(I) |
|
./pkg/fizhi/fizhi_turb.F |
4854 |
LINADJ |
VDZETA(I) = VXNUM(I) / VDEN(I) |