File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
2414 |
SFCFLX |
_RL psihdiag(irun),psimdiag(irun) |
./pkg/fizhi/fizhi_turb.F |
2699 |
SFCFLX |
call PSI(vtemp,vzh,psimdiag,psihdiag,irun,vhz,vhz,vhz,vhz,1) |
./pkg/fizhi/fizhi_turb.F |
2701 |
SFCFLX |
stu2m(i) = (psimdiag(i)/vpsim(i) * vus(i)) |
./pkg/fizhi/fizhi_turb.F |
2702 |
SFCFLX |
stv2m(i) = (psimdiag(i)/vpsim(i) * vvs(i)) |
./pkg/fizhi/fizhi_turb.F |
2718 |
SFCFLX |
call PSI(vtemp,vzh,psimdiag,psihdiag,irun,vhz,vhz,vhz,vhz,1) |
./pkg/fizhi/fizhi_turb.F |
2720 |
SFCFLX |
stu10m(i) = (psimdiag(i)/vpsim(i) * vus(i)) |
./pkg/fizhi/fizhi_turb.F |
2721 |
SFCFLX |
stv10m(i) = (psimdiag(i)/vpsim(i) * vvs(i)) |