| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1424 |
TRBFLX |
_RL VZ2(irun),VDZSEA(irun),VAZ0(irun),VXNUM1(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 |
2393 |
SFCFLX |
_RL VZ2(irun),VDZSEA(irun),VAZ0(irun),VXNUM1(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 |
4139 |
LINADJ |
_RL VZ2(irun),VDZSEA(irun),VAZ0(irun),VXNUM1(irun) |
|
./pkg/fizhi/fizhi_turb.F |
4192 |
LINADJ |
VAZ0(I) = 1. / VZ1(I) |
|
./pkg/fizhi/fizhi_turb.F |
4193 |
LINADJ |
VG(I) = VDZSEA(I) * VAZ0(I) |
|
./pkg/fizhi/fizhi_turb.F |
4204 |
LINADJ |
IF (IWATER(I).EQ.1) VDZ0(I) = VDZ0(I) * VAZ0(I) |
|
./pkg/fizhi/fizhi_turb.F |
4339 |
LINADJ |
VDPSIM(I) = - VDZ0(I) * VAZ0(I) |