Symbol Description Uses
psimdiag 7



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))