| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
4649 |
LINADJ |
1 VAPSIM, VAPSIHG,VPSIH,VPSIG,VX,VX0,VY,VY0,ITYPE,LWATER,IRUN, |
|
./pkg/fizhi/fizhi_turb.F |
4702 |
LINADJ |
_RL VX0(IRUN),VY(IRUN),VY0(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4744 |
LINADJ |
VX0PSIM(I) = VX0(I) * VAPSIM(I) |
|
./pkg/fizhi/fizhi_turb.F |
4791 |
LINADJ |
VDX(I) = VX(I) - VX0(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 |
4921 |
LINADJ |
VDPSIM(I) = VDPSIM(I) - VX0(I) * VDZ0(I) |