Symbol Description Uses
psimdiag 14



File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2479 SFCFLX
      _RL psihdiag(irun),psimdiag(irun)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2764 SFCFLX
        call PSI(vtemp,vzh,psimdiag,psihdiag,irun,vhz,vhz,vhz,vhz,1)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2766 SFCFLX
         stu2m(i) = (psimdiag(i)/vpsim(i) * vus(i))
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2767 SFCFLX
         stv2m(i) = (psimdiag(i)/vpsim(i) * vvs(i))
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2783 SFCFLX
        call PSI(vtemp,vzh,psimdiag,psihdiag,irun,vhz,vhz,vhz,vhz,1)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2785 SFCFLX
         stu10m(i) = (psimdiag(i)/vpsim(i) * vus(i))
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2786 SFCFLX
         stv10m(i) = (psimdiag(i)/vpsim(i) * vvs(i))
./pkg/fizhi/fizhi_turb.F 2440 SFCFLX
      _RL psihdiag(irun),psimdiag(irun)
./pkg/fizhi/fizhi_turb.F 2725 SFCFLX
        call PSI(vtemp,vzh,psimdiag,psihdiag,irun,vhz,vhz,vhz,vhz,1)
./pkg/fizhi/fizhi_turb.F 2727 SFCFLX
         stu2m(i) = (psimdiag(i)/vpsim(i) * vus(i))
./pkg/fizhi/fizhi_turb.F 2728 SFCFLX
         stv2m(i) = (psimdiag(i)/vpsim(i) * vvs(i))
./pkg/fizhi/fizhi_turb.F 2744 SFCFLX
        call PSI(vtemp,vzh,psimdiag,psihdiag,irun,vhz,vhz,vhz,vhz,1)
./pkg/fizhi/fizhi_turb.F 2746 SFCFLX
         stu10m(i) = (psimdiag(i)/vpsim(i) * vus(i))
./pkg/fizhi/fizhi_turb.F 2747 SFCFLX
         stv10m(i) = (psimdiag(i)/vpsim(i) * vvs(i))