| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1418 |
TRBFLX |
_RL VDPSIH(irun),VZH(irun) |
|
./pkg/fizhi/fizhi_turb.F |
1773 |
TRBFLX |
5 VDPSIH,VZH,VXX0,VYY0,VAPSIHG,VRIB1,VWS1,VPSIH, |
|
./pkg/fizhi/fizhi_turb.F |
2327 |
SFCFLX |
8 VDPSIH,VZH,VXX0,VYY0,VAPSIHG,VRIB1,VWS1,VPSIH,VZETAL, |
|
./pkg/fizhi/fizhi_turb.F |
2389 |
SFCFLX |
_RL VDPSIH(irun),VZH(irun),VXX0(irun),VYY0(irun) |
|
./pkg/fizhi/fizhi_turb.F |
2514 |
SFCFLX |
VZH(I) = VZ0(I) * VAHS(I) |
|
./pkg/fizhi/fizhi_turb.F |
2516 |
SFCFLX |
CALL PSI (VZETA,VZH,VPSIM, |
|
./pkg/fizhi/fizhi_turb.F |
2584 |
SFCFLX |
VZH(I) = VZ0(I) * VAHS(I) |
|
./pkg/fizhi/fizhi_turb.F |
2586 |
SFCFLX |
CALL PSI (VZETA,VZH,VPSIM, |
|
./pkg/fizhi/fizhi_turb.F |
2677 |
SFCFLX |
VZH(I) = VZ0(I) * 0.1 |
|
./pkg/fizhi/fizhi_turb.F |
2679 |
SFCFLX |
CALL PSI (VTEMP,VZH,VHZ, |
|
./pkg/fizhi/fizhi_turb.F |
3035 |
PSI |
SUBROUTINE PSI(VZZ,VZH,VPSIM,VPSIH,IRUN,VX,VXS,VY,VYS,IFLAG) |
|
./pkg/fizhi/fizhi_turb.F |
3058 |
PSI |
_RL VZZ(IRUN),VZH(IRUN),VPSIM(IRUN),VPSIH(IRUN), |
|
./pkg/fizhi/fizhi_turb.F |
3098 |
PSI |
ZZ0(I) = VZH(I)*VZZ(I) |
|
./pkg/fizhi/fizhi_turb.F |
3232 |
PSI |
ARG1(indx) = VZH(I) |